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La impresora personal 



New Print es la familia de impresoras que hemos seleccionado p ara su 
ordenador personal: rápidas, fiables, características profesionales y precio bajo, 
no son un juguete, sino una impresora económica. 

AHORA VELOCIDAD: 100 c.p.s. 

El precio y plazo de entrega consúltelo a su proveedor habitual. 

















ACTUALIDAD. Spectrum 128 K ya una 
realidad. 


HELP. Utilidades.en microdrive. 

JUEGOS. Ejercita tus músculos con el 
Hyper Sports y vive una aventura con 

EL MICRODRIVE ESE 
DESCONOCIDO. Optimiza el manejo 
de este poular periférico. _ 

CODIGO MAQUINA. Primeros 
programas. 


Cálculo de 
estructuras: £/ 
Spectrum 
aplicado a la 
ingeniería. 


Dibujando con el 
GraphiQL. 


GUSANEZ. 


PREGUNTAS Y RESPUESTAS. 


QL MAGAZ1NE. GRAFIQL para 

UN NUEVO OPERATIVO (II). Rutinas 
ampliación del B ASIC. _ 

PROGRAMAS. Editor de pantallas. 
Subrutinas gráficas en PASCAL. 


EL CORCHO. 


CALCULO DE ESTRUCTURAS. 
Programas de gran utilidad para 
arquitectos e ingenieros. 
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CALCULO 
DE ESTRUCTURAS 



pensarían ustedes si tes dijeran que su 
Spectrum 48K? No tienen por qué asustarse, 


Soft que vamos a comentar permite realizar estos cálculos en por lo menos 
100 de los casos y con resultados más que correctos 


vivienda hubiera sido calculada con un 
la colección de programas de Paraninfo 

un 90 por 











































































E l Spectrum es un ordenador 
personal, aunque para mu¬ 
chos no pasa de ser un ju¬ 
guete que tiene muchas po¬ 
sibilidades. Es común el 
pensar que un Spectrum sif^e sólo 
para jugar y que para realizar tra¬ 
bajos serios debemos recurrir a or¬ 
denadores profesionales que se di¬ 
señan exclusivamente para eso. 
Así, si un arquitecto cree que nece¬ 
sita un ordenador para su estudio, 
la posibilidad de que el ordenador 
Spectrum sea el escogido está prác¬ 
ticamente descartada, siendo lo 
normal el buscarlo entre los pro¬ 
ductos que ofrecen las multinacio¬ 
nales del sector, mucho más com¬ 
pletos, rápidos y caros. 

Cuando se va a adquirir un orde¬ 
nador profesional es normal que el 
hardware, o máquina, sea mucho 
más barato que el software o pro¬ 
gramas. Ello es esencialmente por¬ 
que en este tipo de mercado es más 
importante lo que hace que con 
que lo hace. 

Pero no debemos olvidar que 
hace muy pocos años un ordena¬ 
dor con la capacidad y potencia 
del Spectrum, no sólo hubiera sido 
profesional sino que hubiera sido 
de lo más cotizado y además los 
paquetes de programas de cálculo 
de estructuras no son un invento 
reciente. Luero no nos debe extra¬ 
ñar que con un Spectrum se pue¬ 
dan hacer cálculos profesionales 
serios aunque tampoco hay que 
engañarse, los ordenadores profe¬ 
sionales actuales son mucho más 
completos y efectivos. 

Sí usted es un arquitecto y consi¬ 
dera que no tiene el suficiente tra¬ 
bajo para rentabilizar un ordena¬ 
dor profesional, puede que tenga 
en su Spectrum una solución razo¬ 
nable, e incluso puede que le inte¬ 
rese comprar el Spectrum y el pa¬ 
quete de programas de Paraninfo 
Soft para destinarlo a un uso pro¬ 
fesional. 

Para los lectores no versados en 
estos temas vamos a tratar de ex¬ 
plicar de una manera sencilla y en 
un lenguaje asequible para qué se 
usan estos programas. Un cálculo 
de estructuras consiste básicamen¬ 
te en la determinación de las di¬ 


mensiones y características de los 
elementos constructivos para obte¬ 
ner la estructura deseada. 

Sí, por ejemplo, queremos anali¬ 
zar cómo se hace una vivienda, 
hay que distinguir dos fases, la de 
diseño y la de cálculo. En la prime¬ 
ra se debe plasmar en un dibujo 
cómo queremos que sea la vivien¬ 
da y qué usos vamos a darle, en 
esta fase se incluye la parte artísti¬ 
ca de la arquitectura. 

Una vivienda se compone de 
una estructura que es la que sopor¬ 
ta el peso de la misma, y de unos 
cerramientos que son las paredes y 
techos, aunque esta distinción no 
sea muy rigurosa vale para andar 
por casa. La estructura es algo así 
como el esqueleto de la edifica¬ 
ción, nosotros sabemos dónde es¬ 
tán los huesos, que se llaman vigas 
si son horizontales y pilares o co¬ 
lumnas si son verticales, y las arti¬ 
culaciones, llamadas nudos y que 
son los puntos donde concurren 
dos o más vigas y pilares. Lo que 
queremos saber es cuál debe ser el 
tamaño de las vigas, pilares y ci¬ 
mientos, para que la estructura 
aguante y sea segura ante adversi¬ 
dades desconocidas mediante los 
coeficientes de seguridad. 

La colección de programas vie¬ 
nen ordenados secuencialmente 
para calcular, a partir de los pesos 
máximos previstos, cómo se repar¬ 
ten los esfuerzos sobre la estructu¬ 
ra y a partir de ello se deduce la di¬ 
mensión que tienen que tener los 
elementos constructivos para po¬ 
der soportar esos esfuerzos. Todos 
estos métodos de cálculo están 
normalizados, es decir, que deben 
ser realizados siguiendo esquemas 
de cálculo redactados por las auto¬ 
ridades competentes y que como 
puede comprobarse pueden ser 
implementados en el Spectrum. 

Nos damos cuenta que para un 
lector profano en la materia los co¬ 
mentarios de los programas pue¬ 
den resultar un poco incomprensi¬ 
bles, pero creemos que la profesio- 
nalidad que demuestran tener es¬ 
tos programas les hace merecedo¬ 
res de ser incluidos en una revista 
divulgativa aunque no técnica. El 
Spectrum puede hacer mucho más 
de lo que se cree vulgarmente. 



La colección 

Cuando nos pusimos a realizar 
el comentario de esta colección 
imaginamos otra cosa, supusimos 
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Cálculo de Estructuras 
software básico para los 
arquitectos 


que serían unos programas básicos 
sacados de algún curso de Resis¬ 
tencia de Materiales o de Estructu¬ 
ras meramente educativo y sin 
apenas utilidad práctica. Al cargar¬ 
los en el ordenador cambió total¬ 
mente nuestra impresión, el pro¬ 
grama era muchísimo más serio y 
pedimos la colaboración de un ar¬ 
quitecto en ejercicio que no creyó 
lo que le estábamos contando has¬ 
ta que no lo vio, y mucho nos te¬ 
memos que esto sea lo que le pase 
a usted. De todas maneras sepa 
que los programas han sido escri¬ 
tos por José Luis del Río Moreno, 
dé Paraninfo Soft, S. A., que había 
trabajado también en los progra¬ 
mas de cálculo de estructuras de 
Hewlett Packard. 

La colección de programas se 
compone de dos secciones. Estruc¬ 
turas de Hormigón y Estructuras 
Metálicas. 

La colección de Estructuras de 
Hormigón se compone de 5 pro¬ 
gramas. 

-—Memoria de cálculo y cargas. 

—Cálculo de esfuerzos en pórti¬ 
cos. 

—Cálculo de armaduras de vi¬ 
gas. 

—Cálculo de armaduras de pila¬ 
res. 

—Cálculo de cimientos. 

La colección de Estructuras Me¬ 
tálicas se compone de 4 progra¬ 
mas. 

—Memoria de cálculo y cargas. 

—-Cálculo de perfiles en vigas. 

—Cálculo de perfiles en pilares. 

—Cálculo de cimientos. 

Estos programas se presentan lu¬ 
josamente encuadernados, con dos 
versiones una para impresora ZX y 
la otra para impresora Centronics. 
También se suministra una cinta 
cassette virgen de 10 minutos que 
no he llegado a comprender el por 
qué de su presencia. Los folletos de 
instrucciones no son excesivamen¬ 
te completos aunque en la ejecu¬ 
ción de los programas se repiten 
las instrucciones, suponiendo una 
pesadez cuando los programas ya 
han sido ejecutados varias veces. 

La introducción de los datos es 
la adecuada, con suficientes inter¬ 
pelaciones verificatorias, que des¬ 
graciadamente son necesarias. Re¬ 
sulta imprescindible el trabajar 


con impresora, debido a la canti¬ 
dad de datos que son necesarios y 
también a la cantidad de datos que 
se obtienen de los programas. El 
único «defeetillo» apreciable en la 
introducción de datos no es que 
nos podamos salir de rango en los 
valores, sino que escribamos más 
decimales de los normales estro¬ 
peando la presentación del resulta¬ 
do en la pantalla, pero para un 
usuario profesional esto no tiene 
sentido. 

La presentación es agradable, tal 
vez tenga excesivos colorines, que 
suponemos habrán realizado así 
aprovechando las posibilidades del 
Spectrum, pero que puede ejercer 
una impresión negativa en algunos 
profesinales que confunden lo se¬ 
rio con lo sobrio. Afortunadamen¬ 
te la informática moderna con su 
nuevo desarrollo de gráficos inte¬ 
ractivo tiende a que cada vez su 
programas presenten un aspecto 
visual más agradable. 


Descripción 
de los programas 

Como los programas van en se¬ 
ries cuasi para le las y para no hacer 
una crítica pormenorizada de nue¬ 
ve programas el comentario va a 
ser común para ambas coleccio¬ 
nes. 

El primer programa de la colec¬ 
ción es la Memoria de Cálculo y 
Cargas. En su inicio nos ofrece la 
muestra de los valores típicos so¬ 
bre los que va a trabajar, resultan¬ 
do estos valores los normales en 
construcción, admitiéndose ade¬ 
más una gama de valores más que 
suficiente que, por ejemplo, llega 
hasta admitir una presión admisi¬ 
ble sobre el terreno de hasta 100 
kg/cm 2 . El programa nos pregunta 
si hay terrazas, si son voladas, y si 
hay alguna planta con sobrecarga. 
Definimos la altura de 1a. cinco 
plantas, el tipo de cubierta, tipo de 
fachada, escalera y si hay ascensor. 

El programa sólo nos da dos op¬ 
ciones erí cuanto a cubierta indi¬ 
nada: teja y pizarra. En este aspec¬ 
to es pobre, pues no considera teja 
de cemento o árabe, cubierta de ft- 
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b roe emento, de paneles sandwich 
de chapa, de «shingles asfáltica»... 

Referente a las sobrecargas, el 
programa sólo da opción a que 
exista una planta con sobrecarga 
distinta de la general de plantas, lo 
cual resulta un poco pobre para 
edificios en que se agrupan dife¬ 
rentes usos. 

Las opciones relativas al dobla¬ 
do de las fábricas son pobres tam¬ 
bién, pues sólo considera tabique, 
tabicón o carencia de doblado, ol¬ 
vidando tecnologias muy en boga 
como el yeso cartón y también la 
escayola. 

El programa no pide sobrecarga 
de uso en terraza o nieve, ponien¬ 
do en total 200 kg/m-, que es una 
cifra conservadora. 

El juicio general es que se trata 
de un buen programa que sirve 
para que un arquitecto redacte su 
preceptiva Memoria de Cálculo de 
Estructura de un Proyecto, para 
visar en el Colegio Profesional y 
entregar al diente. Los procedi¬ 
mientos de cálculo son los norma¬ 
lizados. 

Los defectos que se pueden seña¬ 
lar son los siguientes: 

—Limitación de opciones sobre 
las que escoger en algunos casos, 
que contrastan con la gran ampli¬ 
tud en otros. 

—El apartado de cálculo de za¬ 
patas que se redacta en la memoria 
así como en aquel en el que se ha¬ 
bla del método de cálculo, parece 
más una clase de estructuras que 
un documento de un proyecto. 

La calificación que merece este 
programa es excelente. 


Cálculo de esfuerzos 
en pórticos 

El siguiente programa rompe la 
simetría entre ambas colecciones, 
ya que sólo se presenta para es¬ 
tructuras de hormigón. 

Este programa es el que suele ca¬ 
racterizar a la potencia de todo el 
paquete, ya que es el más critico, 
por lo que creo resultará más inte¬ 
resante al profesional que hable¬ 
mos aquí de las posibilidades que 
permite. 


Inicialmente nos presenta los 
valores típicos característicos que 
son los mismos que en el programa 
anterior. Se nos pregunta poste¬ 
riormente cuál es el número de nu¬ 
dos de la estructura teniendo como 
límite superior 80. Después hace 
lo mismo con las vigas estando el 
máximo en 80 y el mínimo en el 
número de nudos. En el programa 
aparecen otra vez instrucciones so¬ 
bre los tipos de pilares, ya que el 
programa no pide número de pila¬ 
res, sino tipos diferentes de pilares, 
en cuanto a sección o altura. Estos 
pilares deben ser predefinidos, no 
ocurriendo esto con las vigas. En 
las instrucciones se nos invita a 
que realicemos un esquema previo 
de la estructura, numerando las vi¬ 
gas de acuerdo a una norma muy 
simple y denominando a los nudos 
en función de su situación en la es¬ 
tructura de acuerdo a una ordena¬ 
ción que también se muestra en el 
programa, así como la nomencla¬ 
tura de vigas y pitares que concu¬ 
rren a un nudo, resultando bastan¬ 
te chocante que a las vigas que 
concurren a un nudo se las llame 
Bde y Biz. Una vez introducida la 
topología de la estructura nos lle¬ 
vamos la sorpresa de que han va¬ 
riado las instrucciones sin cambiar 
el librito. lo cual parece un poco 
chapucero, este cambio consiste en 


que hay que dar las cargas ya cal¬ 
culadas introduciendo un peso 
aproximado de la viga, con lo que 
se eliminan errores en la introduc¬ 
ción de los datos. Así se introdu¬ 
cen los datos de la viga, luz y car¬ 
gas y se obtiene los valores de los 
cortantes a cada lado y los momen¬ 
tos a cada lado y en el centro. Nos 
pide que fijamos un valor para la 
sección de viga, h ó b dándonos 
como margen entre 15 y 120 cm: si 
no nos complace la sección de viga 
tenemos dos opciones, o fijamos 
otro nuevo valor o introducimos la 
sección aparte del programa. 

El final del programa nos ofrece 
el cálculo de ios momentos hipe- 
restáticos. dándonos además otras 
constantes de cálculo, que pueden 
servir como comprobación, que 
son la rigidez y el coeficiente de re¬ 
parto. También nos calcula los es¬ 
fuerzos finales en vigas dando el 
momento ísosiático en el centro y 
los momentos hiperestáticos y cor¬ 
tantes isostáticos en los extremos, 
y concluye con los momentos fina¬ 
les en los pilares. 

Este programa es brillante y nos 
hace recordar los terribles esfuer¬ 
zos que realizaron generaciones de 
técnicos para hacerse a mano el re¬ 
parto de esfuerzos mediante el mé¬ 
todo de Cross, operaciones que el 
ordenador nos soluciona rapidísi- 
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mámente y «cerrando todos los 
nudos», es decir igualando perfec¬ 
tamente los esfuerzos (con dos de¬ 
cimales). cosa casi imposible o por 
lo menos muy difícil de realizar 
manualmente. 

La crítica más seria que puede 
hacerse de este programa es que a 
nuestro juicio han mal utilizado 
memoria operativa dentro del pro¬ 
grama escribiendo instrucciones 
completamente innecesarias si se 
hubiera redactado un manual de 
instrucciones claro. Además debe¬ 
mos añadir que dichas instruccio¬ 
nes son evidentes sobre todo des¬ 
pués de haber ejecutado el progra¬ 
ma varias veces y sólo sirven para 
que el usuario teclee la «s» para 
pedir el cambio de pantalla. Si¬ 
guiendo por aquí me parece poco 
imaginativo el usar la «s» para 
contestar afirmativamente a pre¬ 
guntas y pasar páginas, el «autore- 
peat» nos puede jugar alguna mala 
pasada, este defecto ocurre en toda 
la colección. 


Otros cálculos 

Los siguientes programas son ¡os 
del cálculo de vigas, de los perfiles 
en estructuras metálicas y de las 
armaduras en las de hormigón. Es¬ 
tos programas calculan todo a par¬ 
tir de las normas usuales en cons¬ 
trucción. El programa de Cálculo 
de Perfiles nos da a escoger entre 
perfiles IPN, IPE o ambos. Los da¬ 
tos más interesantes que hay que 
introducir son; n,° de plantas, n.° 
de vigas, y pilares por planta, la to¬ 
pología de la estructura (aquí son 
estéreas). la carga y la luz de cada 
viga. Obteniendo el programa para 
cada viga, los cortantes sobre los 
lados, el momento en el centro, el 
tipo de perfil, la tensión de trabajo, 
las flecha y su relación longitud 
Hecha y el peso de la viga. Además 
nos da el peso de vigas por planta, 
las cargas en los pilares por planta 
y las cargas totales acumuladas. La 
capacidad de cálculo de este pro¬ 
grama abarca 176 vigas. 

Para el programa de cálculo de 
armaduras en vigas, el programa 
pide un diámetro para armar, si es 
demasiado el programa probara 


con armaduras de tamaño menor, 
hasta el 2 o 10. Si el diámetro es 
mayor aumentará el de las barras 
para poder armar todo en una 
capa. El programa pide caracterís¬ 
ticas del pórtico, n." de plantas y 
vigas a calcular. Para cada viga nes 
pide un número de datos; canto, 
ancho, luz, cortantes en los lados, 
momentos en los extremos y en el 
centro. Después nos pide la topo¬ 
logía de la estructura. Los resulta¬ 
dos que nos ofrece el programa 
son: Arranques izquierdo y dere¬ 
cho calculando las armaduras su¬ 
perior e inferior, lo mismo en el 
centro del vano, así como la arma¬ 
dura a cortante. También presenta 
los cortantes hiperestáticos y para 
armar así como ios estribos en los 
arranques. Finalmente nos da las 
cargas verticales en pilares, en 
cada planta y totales por planta. 

En la entrada de esfuerzos no 
permite corregir el primer dato, 
sino tan sólo el segundo. Hay que 
considerar que sólo se deben meter 
las vigas diferentes que existen a 
armar, no todas las existentes, pues 
aunque sea evidente, se tiende a 
introducir todas las vigas existen¬ 
tes. 

Al no haber gráficos en el pro¬ 
grama, no podemos definir la lon¬ 
gitud del armado, por lo que hay 
que completarlo con un cálculo 
manual, lo que es verdaderamente 
un fallo, aunque excusable porque 
no debemos olvidar que estamos 
trabajando con un Spectrum. 

Lo siguiente es el cálculo de ar¬ 
maduras de pilares en estructuras 
de hormigón y cálculo de perfiles 
de pilares en estructuras metálicas. 

El programa de cálculo de arma¬ 
duras nos solicita la definición de 
la estructura, plantas y pilares por 
planta, la dimensión de los pilares, 
las cargas y momentos por plantas. 
El programa nos ofrece el cálculo 
de las cargas totales acumuladas 
por planta. Las armaduras las cal¬ 
cula ofreciendo además una serie 
de datos adicionales como son: di¬ 
mensiones, carga vertical, momen¬ 
to en los ejes X e Y, excentricidad 
según los mismos ejes, excentrici¬ 
dad adicional y total según los ejes. 
Y por supuesto las armaduras, con 
la carga que soportan y los estri¬ 
bos. 


El programa de cálculo de perfi¬ 
les en pilares nos da a escoger entre 
tres tipos de pilares; 2-UPN solda¬ 
das a tope, 2-UPN empresiliadas, 
y perfil HEB. Después de definir la 
estructura y las cargas, momentos 
y altura de cada pilar, el programa 
ofrece los resultados que son; carga 
vertical, momentos según los ejes, 
altura del pilar, perfil del pilar, 
momentos de inercia, radios de 
giro, momentos resistentes, coefi¬ 
ciente de pandeo, sección, tensión 
de trabajo y peso del pilar, además 
nos da el peso total por planta y el 
peso total. 

Este programa presupone que 
entramos con valores calculados 
previamente, como todos los ante¬ 
riores el trabajo de introducción de 
datos se multiplica enormemente 
por la independencia de los pro¬ 
gramas. Lo más espectacular resi¬ 
de en que el programa contiene to¬ 
dos los datos de los perfiles HEB, 
UPN soldadas y empresi liadas. 

Los programas de Cálculo de ci¬ 
mientos son lo más simple de la 
colección aparentemente, su fun¬ 
cionamiento es correcto y los re¬ 
sultados que nos ofrece son; tipo 
de zapata, pilares centrado o des¬ 
centrados según una o dos direc¬ 
ciones. Cargas y momentos sobre 
la zapata, excentricidades, dimen¬ 
siones de las zapatas, armaduras. 


Comentario general 

La crítica general más razonable 
que puede hacerse a esta colección 





de programas es que no hayan in¬ 
tentado realizar una colección 
compacta, que tuviera solución de 
continuidad con la ejecución de 
los diferentes programas, así una 
vez cargado el primero el progra¬ 
ma almacenará los datos oportu¬ 
nos para que no tuvieran que ser 
introducidos en el siguiente. Tam¬ 
bién resulta inconveniente mostrar 
las instrucciones dentro del pro¬ 
grama y sobre todo tan repetida¬ 
mente como se hace aquí, creo que 
se debe considerar al usuario lo su¬ 


ficientemente inteligente como 
para suponer que puede trabajar 
con el manual al lado y que pueda 
comprender todo, ya que con poca 
experiencia en el manejo de estos 
se puede adquirir un control del 
programa bastante positivo. Los 
manuales de instrucciones son un 
poco deficientes. 

La solución de continuidad es 
complicada, sobre todo teniendo 
en cuenta que trabajamos con pro¬ 
gramas grabados en cassette y con 
un ordenador pequeño, además 


probablemente motivos económi¬ 
cos indujeron a Paraninfo Soft, 
S. A., a separar los programas in¬ 
dependizándolos porque tal vez el 
precio de una colección de progra¬ 
mas no debe superar el precio de 
un microordenador. Esperemos 
que esta creencia cambie, ya que a 
nuestro juicio vale más la propia 
capacidad de los programas que 
muchas de las máquinas. 

Cesar Hernández 



Tenemos que agradecer la co¬ 
laboración prestada por el ar¬ 
quitecto en ejercicio D. Juan 
Luis Mateo Jiménez, que ha co¬ 
mentado con migo estos progra¬ 
mas y que ha realizado una im¬ 
presión general sobre la colec¬ 
ción. 

«La primera sorpresa al tra¬ 
bajar con los programas es ver 
que dan muchos más resultados 
y datos de los que el usuario de 
un microordenador puede espe¬ 
rar. 

Los programas pueden cubrir 
las necesidades de un estudio de 
Arquitectura en general, aun¬ 
que existe la necesidad de 
apoyar ios programas con algu¬ 
nos cálculos manuales y dibujos 
exteriores. 

Pero lo más impresionantes 
es la relación calidad-precio. 
Por unas 60.000 ptas. se consi¬ 
gue un apoyo estructural im¬ 
portante, que cubre la mayoría 
de los casos que ocurren en edi¬ 
ficación, a excepción de muros. 

Para muchos sera más intere¬ 
sante comprarse estos progra¬ 
mas y un Spectrum, en vez de 
pagar e! programa de estructu¬ 
ras del ordenador profesional 
que posean. Otro punto intere¬ 
sante es la rapidez. Con un or¬ 
denador con capacidad limitada 
parecía lógico pensar que los 
cálculos y elección de perfiles 




í-\ 


durará un cierto tiempo, y son 
prácticamente instantáneos. El 
resumen es que son unos pro¬ 
gramas francamente interesan¬ 
tes y a un precio asequible». 


El resumen es que estamos 
ante una auténtica colección 
Profesional excelente. 
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Periódicamente aparecen programas desti¬ 
nados a facilitarnos la programación en BA¬ 
SIC, con comandos y opciones que faltan en el 
Spectrum. En este caso es Dimensión New 
quien nos presenta un producto de este tipo. 
La versión que comentamos viene en rrricro- 
drive, lo que mejora su velocidad de carga. 


E n el cartucho apare¬ 
cen dos copias, una 
ejecutable con 
RUN y otra, sin autoeje- 
cución, que se puede car¬ 
gar con LOAD, aunque 
está pensada para su uso 
con MERGE, como vere¬ 
mos más adelante. El pro¬ 
grama principa! está es¬ 
crito en BASIC y en el 
mismo cartucho hay una 
serie de subrutina, a las 
que se accede desde un 
menú cargándose las ade¬ 
cuadas, con la ventaja que 
supone al no ocupar mu¬ 
cha memoria. En este 
programa principal nos 
aparece un menú, inicial 
que nos indica las posibi¬ 
lidades que tiene el pro¬ 
grama: ocho útiles rutinas 
localizables a partir de 
64000. Dentro de esta se¬ 
rie de rutinas tenemos 
desde un renumerador de 
líneas a un mapa de me¬ 
moria. La lista de rutinas 
es: 

—Renumerador de lí¬ 
neas (A). Funciona bas¬ 
tante bien a excepción de 
saltos con expresiones va¬ 
riables como puede ser: 

GOTO 1000*S 

imposibles de renumerar 
automáticamente. En este 
caso el programa nos indi¬ 
ca que se ha encontrado 
una expresión no renu- 
mcrable. Se puede especi¬ 
ficar el número de la pri¬ 
mera línea, asi como el 
incremento entre líneas. 

—Elimina sentencias 
REM, que durante la pro¬ 
gramación previa nos han 
podido servir como indi¬ 
cativos (B). Revisa línea 
por linea, siendo un buen 
sistema para ahorrar me¬ 
moria en los programas fi¬ 
nalizados. 


—Mapa de memoria 
(C). Es una rutina muy 
útil, que no es necesario 
cargar, ya que está en BA¬ 
SIC. dentro del programa 
principal del Help. Nos 
indica la memoria que 
ocupa el programa, las va¬ 
riables y gráficos defini¬ 
dos, además de la memo¬ 
ria aún disponible. 

—Borrador de bloques 


de líneas (B). Util cuando 
el número de líneas a bo¬ 
rrar es grande. 

—Compactador de pro¬ 
grama (C). En el Spec¬ 
trum. difícilmente resulta 
muy útil, ya que los espa¬ 
cios no hace falta poner¬ 
los. Revisa todo el progra¬ 
ma, quitando todos los 
códigos de control, así 
como los espacios innece¬ 


sarios ahorrando memo¬ 
ria. 

—Cambia instruccio¬ 
nes (F). Busca en el pro¬ 
grama las instrucciones o 
letras que queramos y las 
cambia por las deseadas. 
Puede ser úli 1 en casos es¬ 
peciales como adaptar 
programas de pantalla a 
impresoras cambiando 
PRINT POR LPRINT o 
cambiar el nombre a algu¬ 
na variable. 

—Listado de variables 
(G). Puede ser interesante 
para programas largos, ya 
que nos muestra una lista 
de todas las variables, nu¬ 
méricas y alf'anuméricas 
de nuestro programa, in¬ 
cluyendo las variables di¬ 
mensión adas. Pero que no 
se asuste nadie, pueden 
aparecer las variables XS, 
V$, WS, W y V que son 
¡as del Help, que perma¬ 
necen a pesar de que. 
como veremos, el progra¬ 
ma desaparece al ejecu¬ 
tarse la rutina. 

—Variables a cero (II). 
Actúa poniendo a cero las 
variables que se hayan de¬ 
finido, a diferencia de 
CLEAR. que las borra. 

—Salida (I). Va directa¬ 
mente al comando STOP 
del siguiente menú. 

Una vez que se elige la 
subrutina, se carga desde 
el microdrive la deseada. 
La ordenación correspon¬ 
de al nombre que poseen 
en el cartucho. 

Una vez cargada la ruti¬ 
na pasamos al segundo 
menú, en el que se nos in¬ 
dica las posibilidades de 
cargar el programa a de¬ 
purar desde microdrive o 
cassette, ejecutar la rutina 
deseada, volver al menú o 
parar la sesión. Hay que 











hacer notar que aquí tiene 
el programa su punto más 
flaco, ya que borra las lí¬ 
neas del programa Help, 
para lo cual tarda casi dos 
minutos, que es, en nues¬ 
tra opinión, un tiempo 
excesivo. 

Posteriormente se eje¬ 
cutará nuestra rutina, que 
generalmente no tarda 
mucho a no ser que le di¬ 
gamos que renumere mu¬ 
chas líneas o el programa 
sea largo. 

En cuanto a nuestro 
programa se puede decir 
que habrá que tener algu¬ 
nas precauciones. No de¬ 
be contener líneas com¬ 
prendidas entre 9950 y 


HELP PROGRAMACION fíl OIHtrs i oriNCU 


OPCIONES 


R . 

- R e n u m e r a d o r . 

E . 

-Cornea c 

Prog 

B . 

—Elimina RBM. 

F . 

“Cambi a 

Oo m . 

C . 

“Mapa Memoria, 
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-Listar 

Ua r . 

D . 

-Borra Lineas. 

H . 

-Var . a 

Cero 


X h “5a L i d 3 h 


indi c a u n a o p >- i o n 


Pantalla informativa del programa 


9999, así como tampoco 
una variable v$() o llenar 
toda la memoria, ya que 
hay que dejar del orden de 
5K para el código máqui¬ 
na y el programa. No obs¬ 
tante, podemos disminuir 
los problemas cargando 
sólo la rutina en código 
máquina a partir de 
64000. 

En síntesis, es un pro¬ 
grama con algunos puntos 
flojos que pueden servir 
para «decorar» o depurar 
nuestros programas ya he¬ 
chos. Su utilidad como 
ayuda a la programación 
es menor, aunque algunas 
de las opciones pueden 
ser interesantes. 


...MI ORDENADOR ES SINCLAIR, 
MI SERVICIO TECNICO ES HISSA... 


Y es lo lógico. Sí has elegido el mejor 
microordenador del mercado, no vas a 
repararlo con cualquiera. 



Y recuerda que no tendrás sobresaltos 
con ,el precio. 

"COSTE ESTANDAR POR 
REPARACION" 


2X8V 


3/\50_Pj2!: 

f, 75 0 Pt gs : 


Sólo Hlssa te puede garantizar 
la utilización de piezas originales SINCLAIR 
y expertos técnicos en reparación. 
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NIGHTSHADE 

peran las tinieblas y las fuerzas del 
mal sembraron con sus maleficios 
la oscuridad. Todos aquellos teme¬ 
rarios exploradores que se adentra¬ 
ron en la ciudad para desentrañar 
su misterio no volvieron jamás. 
Sin embargo, a pesar de todos los 
De una ciudad apacible, y tran- peligros que aguardan tras sus mu- 
quila, Nightshade pasó a ser un lu- ros tu aventurero se dispone a atra¬ 
gar sombrío y desolado donde im- vesar la ciudad y destruir los de- 


ABC Soft 
Spectrum 48 K 
2.100 ptas. 



Nightshade, 
comienza ia 
aventura contra 
los cuatro 
enemigos de 
la humanidad 
(representados 
en la parte 
inferior de 
ta pantalla}. 


Estamos en una 
ciudad (lena de 
fantasmas 3 pero 
a diferencia de 
otros juegos de 
Ultímate, en 
este podemos 
disparara tos 
enemigos. 



monios y fantasmas que la habi¬ 
tan, para ello cuenta con cinco vi¬ 
das, en cada una de ellas puede te¬ 
ner hasta tres contactos con los de¬ 
monios, cambiando a un color di¬ 
ferente cada vez, primero amarillo, 
después verde y al tercer contacto 
muere. 

Cuando el aventurero atraviesa 
una puerta o gira sobre una casa, 
los muros de esta desaparecen, 
quedando en su lugar una linea 
blanca uniforme que no podrá ser 
atravesada a no ser que sea discon¬ 
tinua, en este caso indicaría que 
hay una puerta. Los muros desapa¬ 
recen para que podamos ver los 
movimientos del explorador al en¬ 
trar en las casas. 

El objetivo del aventurero es, 
como debemos suponer, encontrar 
y destruir los demonios que, están 
representados en la parte inferior 
de la pantalla y, una vez que acabe 
con ellos, desaparecerán las tinie¬ 
blas y toda la ciudad pasará a su 
poder. 

En cuanto a los gráficos exhibi¬ 
dos hay que decir que se han real i- 


Control: El juego puede 
funcionar tanto* por teclado 
como por joystick. 

Jugadores: Uno. 

Gráficos: Excelentes gráfi¬ 
cos en 3 dimensiones. 

Nivel de dificultad: De¬ 
pende de las situaciones; en 
general, se mantiene la difi¬ 
cultad a lo largo de todo el 
juego. 

Originalidad: Reside prin¬ 
cipalmente en la combina¬ 
ción de las 3 dimensiones 
con la buena definición de 
los gráficos. 

Conclusión: Es un juego 
interesante por la dificultad 
que encierra conseguir el ob¬ 
jetivo final. En un principio 
los porcentajes que se obtie¬ 
nen del juego son bastante 
bajos. 






































zado mediante un novedoso proce- una perspectiva más realista en los juego; destacando, además, los gra¬ 
so llamado «Filmation II», en tres movimientos y dan una verdadera Heos de las casas y los fantasmas 
dimensiones, que consigue crear sensación de participación en el que son bastante originales. 


HYPERSPORTS 


ciba continuamente nuevos juegos 
cada vez más atractivos sobre los 
más variados deportes. 

Eli realidad este juego tiene ya 
un fuerte precedente en versiones 
Como hemos podido observar similares aparecidas en video¬ 
día a dia el deporte gana nuevos juegos y en otros desarrollados 
adeptos y, por ello, no es de extra- también para Spectrum. aunque 
ñar que el mercado del software re- las pruebas que incluye son dife- 


ERBE Software 
Spectrum 48 K 
2.100 ptas. 


Tiro aí plato. 
Una de las 
pruebas más 
divertidas... 
¡hasta 

que se falla! 






ISTTfiS 

¡ÍHDTRbl 

3FvDTRy 


ñññ 

pT 

WOñLÜ RCCOftOS 


8.48 TOf 


2 no 

JOI 


3 ao 

7.ee gri 




J 



tí r ■! 



Salto al potro, 
una prueba 
como otra 
cualquiera para 
acabar de 
romper 
su joystick. 


rentes: natación, tiro al plato, po¬ 
tro, tiro con arco, triple salto y le¬ 
vantamiento de peso. 

Cuanto más deprisa se pulsen las 
teclas de control mayor será el im¬ 
pulso que reciba el deportista y 
más posibilidades tendrá de supe¬ 
rar la marca. A los usuarios del 
Spectrum norma! (con teclado de 
goma) quizás les resulte un poco 
más difícil que a los del Spectrum 
plus. 

La puntuación que consigues se 
muestra en la parte superior iz¬ 
quierda de la pantalla, mientras 
que los records de cada especiali¬ 
dad obtenidos hasta el momento 
aparecen en la parte superior dere¬ 
cha. 

Los gráficos son de gran calidad 
dando una buena definición y vi¬ 
sión del atleta en todos sus movi¬ 
mientos. 


Control: Teclado o jovs- 
tick. 

Jugadores: Uno. 

Gráficos: Muy buenos, 
destacando los movimientos 
de los atletas. 

Sonido: Bastante conse¬ 
guido. sobre todo los aplau¬ 
sos del público. 

Nivel de dificultad: La difi¬ 
cultad es creciente a medida 
que se superan las pruebas. 

Originalidad: La amplia 
gama de juegos deportivos 
resta originalidad a éste, lo 
que no es motivo para que 
no sea interesante. 

Conclusión: La competiti- 
vidad es el aliciente de este 
juego, ya que almacena los 
records conseguidos por cada 
participante. 























































Muchos de los aficionados que se animan a comprar un 
microdrive, lo hacen buscando la comodidad que supone el 
uso de estos aparatitos. Y, obviamente, todos desean 
almacenar en ellos los programas que más utilizan —juegos 
principalmente —. La desilusión llega en seguida al darse 
cuenta aun en el caso de que fuera posible usar este cómodo 

sistema, no se sabe cómo. 



MICRODRIVE, 

el gran 
desconocido 




E n el presente artículo no se 
exponen técnicas maravillo¬ 
sas ni remedios infalibles, 
«■i De hecho, hay muchos pro¬ 
gramas que no pueden al¬ 
macenarse en microdrive. Pero es 
seguro que con lo que se comenta, 
muchos van a ser capaces de meter 
en cintura alguno de sus progra¬ 
mas rebeldes. 

Además se darán una serie de 
consejos de uso general para los 
usuarios de MICRODRIVE, EL 
GRAN DESCONOCIDO. 


Conversión de formato 

Son varios los problemas que se 
presentan al aficionado a la hora 


de realizar la conversión cassette- 
microdrive, pero podemos dividir¬ 
los en dos grandes grupos: los refe¬ 
rentes a la memoria disponible y 
los relacionados con el cambio 
medio, que supone la alteración de 
las instrucciones de carga. 

El hecho de conectar un Interfa- 
ce I supone que el usuario contará 
con 79 hytes menos de RAM. En 
efecto, para el correcto funciona¬ 
miento del mencionado interface 
—sin el que los microdrives no 
pueden funcionar—, es necesario 
ampliar el número de variables del 
sistema. Realmente 58 bytes no 
son muchos (un 0,16 por ciento de 
la memoria de un Spectrum 48 K). 
Pero aquí no acaba la cosa, pues 
esto es sólo del interface. Si hace 


uso de un microdrive, el sistema 
necesita otros 595 bytes por cada 
canal abierto. Recordemos que un 
LOAD, SAVE,... supone la aper¬ 
tura y cierre automático de un ca¬ 
nal. De estos, 512 bytes correspon¬ 
den al buffer de datos. (En la jerga 
informática, el término buffer co- * 
rresponde a un área de memoria 
destinada al intercambio de infor¬ 
mación entre entre periféricos de 
distintas velocidades). 

Por tanto, en el mejor de los ca¬ 
sos, por ejemplo el escribir un 
LOAD * «m»; 1; «xxxx» supone 
que: 

— se dispondrá de 79 + 595 = 

674 bytes menos que si se trabajara 
con cinta de cassette. 

— no se podrá trabajar en el es- 












«Bytes», el tema se presenta algo 
más complicado, pero algo puede 
hacerse. En el siguiente apartado 
encontrará información sobre el 
tema. 

En el caso mencionado, cargue 
el primer bloque haciendo uso del 
comando MERGE. De esta mane¬ 
ra evitará que el programa se au- 
toejecute al entrar, y así podrá 
echarle un vistazo. Entre otras co¬ 
sas, encontrará una o varias líneas 
de programa donde se indica la 
carga del resto de los bloques 



pació comprendido entre las direc¬ 
ciones 23734 y 24408.. 

Estas dos formas de «ver la vida» 
corresponde a una única realidad, 
pero dan fe de los dos problemas 
que se plantean: la cantidad de me¬ 
moria disponible y el lugar donde 
se dispone. 


Memoria: Cantidad disponible 

El porcentaje de la memoria sus¬ 
traída sigue siendo pequeño (1,3 
por ciento con 48 K de RAM). Sin 
embargo, esto puede crearnos pro¬ 
blemas en algunos casos. 

Todos los «maníacos cazamar- 
cianos» saben que hay programas 
—los mejores—. que ocupan hasta 


el último byte de la memoria dis¬ 
ponible. Evidentemente, un pro¬ 
grama de este tipo, que ha sido 
pensado para funcionar con cinta 
magnética, no podrá ser nunca al¬ 
macenado en microdrive ya qe el 
funcionamiento .de ambos — 
programa y microdrive — requie¬ 
ren una cantidad de memoria que 
el ordenador no dispone. 

Pero, ¿cómo saber si el progra¬ 
ma que nos ocupa necesita o no 
más memoria de la que podemos 
darle? 

Típicamente un programa co¬ 
mercial consta de varios bloques, 
el primero de los cuales suele estar 
en BASIC y se encarga de gestionar 
la entrada del resto. Si e 1 programa 
fuera de un solo bloque del tipo 


(LOAD, a saber). También verá 
.posiblemente un CLEAR x. Si el 
número x es más bajo que 24610, 
los problemas que se plantean son 
mucho más serios, y deberá usar 
las estrategias del siguiente aparta¬ 
do. La prueba más fiable que pue¬ 
da hacerse es ver si el CLEAR hace 
referencia a un RAMTOP por en¬ 
cima de PEEK 23641 + 256*PEEK 
23642 + 595, antes de que realice¬ 
mos todos los cambios pertinentes. 

Porque, en efecto, hay que hacer 
cambios. En primer lugar se debe¬ 
rá modifr las instrucciones LOAD 
“”CODE por otras más apropiadas 
al nuevo entorno. Tome nota cui¬ 
dadosamente de los posibles nú¬ 
meros que pudiera haber después 
del CODE. Se refieren a las dírec- 

















OFERTA DE SUSCRIPCION 



Te ofrece la posibilidad de suscribirte con unas condiciones 
muy ventajosas para ti: 


1 

2 


Recibir puntualmente, en tu domicilio la publicación 
TODOSPECTRUM que durante 12 meses te proporcionará 
lectura, programas, ayuda, entretenimiento, etc. 

Consigue un práctico regalo: 



Una obra fundamental en la biblioteca 
de los aficionados al Spectrum: 


• Reglas y herramientas del Basic. 

• La técnica de los organigramas. 

• El fabuloso mundo de las rutinas. 

• Variobfes y cadenas. 

• Funciones matemáticas usuales. 


Esta publicación, escrita con estilo 
ameno y práctico, te ayudará a sacar 
_ todo el partido posible a tu máquina. 

3 La opción de ser protagonista. Tú puedes tener una 
participación directa con tus comentarios, programas, 
sugerencias, etc. 

4 Obtener premios importantes con tus programas, y temas 
de interés. 


EN DEFINITIVA , TODO SON VENTAJAS 

No dejes pasar esta oportunidad, suscríbete 

a “TODOSPECTRUM”, cumplimentando hoy mismo el cupón 
de respuesta adjunto. 


ÉAftl IM BRAVO MORILLO. 377 - 5.° A 
Hll TELEFONO: 733 74 13/47/63/97 


28020 MADRID 













PIDALA EN SU QUIOSCO HABITUAL 
O SOLICITELA Á: 

INFODIS, S. A. 

Bravo Murillo, 377 • 28020 Madrid 

















dones donde deben introducirse 
los programas. Caso de existir, son 
indicio claro de que la posición en 
la que entraría el programa es otra, 
lo que requiere especial atención. 

Pero bien pudiera ocurrir que 
después de hacer las modificacio¬ 
nes, el ordenador nos de un error 
del tipo «RAMTOP no! good» o 
«Out of Memory». En efecto, los 
cambios supondrán casi siempre 
un aumento de la capacidad de 
memoria que ocupa el programa 
BASIC. Y esto, unido a lo que ne¬ 
cesita el microdrive... Pero no de¬ 


sespere. El problema puede tener 
solución: vamos a comentar algu¬ 
nos trucos que usados en el progra¬ 
ma BASIC, permiten reducir me¬ 
moria. Este tipo de apaños son ex¬ 
tremadamente populares entre los 
usuarios del ZX-Sl versión 1 K. 

Los más efectivos son los que 
eliminan los números. Así, si usa 
mucho un cierto valor, como tal 
vez «255», resulta conveniente 
convertirlo en una variable. Los 
números poco usados deberán 
convertirse en cadenas. Asi RAN- 
DOMIZE USR xxxxx, puede es¬ 



10 DEF FN B(W í =PEEK W+256*PEEK ÍW+1) 

20 LET SUM=0:LET IX=23296:LET RUT=2340 
0 

30 FOR 1=0 TO 14:READ A:POKE RUT+I,A:L 
ET SUM=SUM+A:NEXT I 
40 IF SUMO 1396 THEN PRINT “ERROR en 
el DATA"!BEEP 1,40: STOP 
50 CLS :let n=o 

100 LET N=N+1:RANDOMIZE USR RUT:PRINT 1 
INVERSE 1j"Bloque numero “ ¡N 
110 PRINT "Nombre: ";:F0R 1=1 TO ÍOJPRI 
NT CHR* PEEK <I+IX)í:NEXT I:PRINT 


120 

PRINT " 

Longitud: “iFN B(IX+11) 


130 

IF PEEK 

IXO 

3 THEN PRINT 

"No 

es un 


CODE “ 

:go TO 

100 



140 

PRINT " 

Comienzo: "¡FN BUX+13) 

:go t 


0 100 





150 

DATA 221,33,0 

,91,175,55,17 

,17, 

0,205 


,86,5, 

48,242 

,201 



160 

REM 





170 

REM RUT 

LD 

IX,5BOOH 



180 

REM 

XOR 

AJ Cabecera 



190 

REM 

SCF 

¡LOAD 



200 

REM 

LD 

DE,17j Longit 



210 

REM 

CALL 

055ÓH 



220 

REM 

JR 

NC,RUT 



230 

REM 

RET 





cribirse como RANDOMIZE USR 
VAL «xxxxx». De este modo aho¬ 
rraremos 3 bytes. Otras estrategias 
de asignación pueden verse en la 
tabla I. 


Tabla I 


N.° 

Equivalente 

Bytes 

ahorrados 

0 

NOT PI 

4 

1 

SGN PI 

5 

3 

INT PI 

5 

n 

VAL “n” 

3 

n<255 

CODE “caract 
ascii” 

2 mínimo 


El lector se preguntará por qué 
tenemos tanto interés en eliminar 
los números. Los números son vo¬ 
races respecto a la memoria que 
necesitan. Sólo por existir, ocupan 
6 bytes. A esto hay que añadirle un 
byie por cada cifra que posea. Así 
el «0», ocupa 7 bytes. y el «0000», 
10 bytes. De los 6 bytes indicados, 
uno es el «código de número» 
(14d. OEH) y los otros cinco, su 
equivalente en el formato de punto 
flotante. Más información sobre 
esto, en el capítulo 24 del Manual 
del Usuario. 

Otra recomendación en la mis¬ 
ma línea es el uso de variables de 
una sola letra o de variables en los 
GOTO o GOSUB. 

Volvemos al asunto que tenía¬ 
mos pendiente. 

Al usar el programa alguna vez, 
habrá observado si alguna de las 
partes es un dibujo de presenta¬ 
ción. Caso de ser así, téngalo en 
cuenta para no grabarlo. Por una 
parte, le ahorrará una memoria 
sustancial. Por otra, dada la veloci¬ 
dad de los microdrives. no va a te¬ 
ner mucha oportunidad de admi¬ 
rarla. 

A continuación, numere los blo¬ 
ques «útiles» y asigne a cada uno 
un nombre. Es una buena idea que 
el nombre sea precisamente el nú¬ 
mero asignado, pues son preferi¬ 
bles los nombres cortos. Vamos a 
comenzar nuestro trabajo. Cargue 
en primer lugar el programa lector 
de cabeceras que proponemos 
(prog. 1). Anote las longitudes y 











comienzo de los bloques que van 
apareciendo. Elimine de la lista los 
que no considere útiles (dibujo, 
instrucciones...). Una vez acabada 
la labor, borre el programa. A con¬ 
tinuación escriba CLEAR xxxxx, 
donde xxxxx es el número que 
aparece con el CLEAR del progra¬ 
ma que va a copiar. 

Repase la hoja donde apuntó la 
distribución de las instrucciones de 
carga. Si la primera es LOAD 
“”CODE, escriba esto mismo. Si 
fuera LOAD ‘"’CODE xxxxx. há¬ 
galo igualmente. Cualquier otra 
posibilidad se resuelve del mismo 
modo. Ponga en marcha la cinta y 
espere a que finalice la carga. Es¬ 
criba ahora SAVE *«m»; 1; «1» 
CODE com. íong donde Iong es la 
longitud anunciada por el progra¬ 
ma lector de cabeceras y com es la 
dirección de comienzo del progra¬ 
ma y será la indicada en el CODE 
de carga, o más corrientemente en 
su defecto el mostrado por el pro¬ 
grama i. El número 1 hace refe¬ 
rencia a¡ orden, aunque el nombre 
puede ser cualquiera, preferible¬ 
mente corto. 

Repita la operación tantas veces 
como partes tenga el programa. 

Cargue de nuevo el programa 
BASIC de gestión, pues es el tumo 
de inodificarlo. Deberá sustituir 
todos los LOAD por LOAD *«m»: 
l;«nom» CODE, donde nom es el 
nombre dado a cada sección (un 
número según la recomendación 
hecha). Si hay muchos bloques, 
puede ser interesante hacer uso de 
un FOR-NEXT. 

Grabe este programa de la forma 
SAVE *«M»; 1: «nom» LINE 1, 
donde nom es el nombre del pro¬ 
grama. lógicamente el mismo de la 
versión cassette. Si todo ha ido 
bien podrá echarse una partidita. 
En otro caso, revise todos los pa¬ 
sos, tal vez haya cometido un 
error, o no haya tenido en cuenta 
algún detalle. 

Memoria: posición 

Como ya adelatábamos, los pro¬ 
blemas pueden venir no por limi¬ 


tación de la memoria disponible, 
sino porque el Microdrive y el in¬ 
terface necesitan la misma zona de 
memoria que el programa. Lamen¬ 
tablemente, de hecho, este es el 
caso más frecuente. La solución es 
más delicada y requiere una cierta 
labor de programación en código 
máquina. Es el caso típico de pro¬ 
gramas que cargan de un solo blo¬ 
que el dibujo de presentación, el 
programa BASIC y el programa en 
código máquina. Veamos cómo se 


resolvió el problema para un di¬ 
vertido juego: «MONSTERS IN 
HELL».' 

El programa tiene tres bloques, 
de los cuates eliminamos el cen¬ 
tral, que es un dibujo de presenta¬ 
ción. El tercer bloque lo grabamos 
en posiciones más altas de memo¬ 
ria, concretamente en 45056: 

LOAD “”CODE 45056 

SAVE *“m”; 1; “MONS. COD.” 

CODE 45056,9471 


1 PAPER 0:INK OrBORDER 0:CLS 

2 CLEAR 45000:LOAD *"m“i 1 \ "Mons.COD"C 

ODE 

3 FOR 1=0 TO i 1: READ AíPOKE 45056+1,A 

:NEXT I:RANDQMIZE USR 45056 

4 SAVE *"m“?1f"MONSTERS"LINE 1 

5 DATA 1,255,36,17,0,91,33,0,176,237, 

176,201 











Ahora retocamos el programa y 
los grabaremos igualmente. Es el 
que hemos llamado Programa 2. 

Al cargarse, dará el mensaje de 
error «Out oí Memory». Pero no 
tema, bastará con hacer GOTO 4 
para solucionar el problema. 

Consejos 

Nombres: Un problema que 
presenta el CAT del microdrive 


El tiempo de acceso a la 
información se reduce 
considerablemente 


frente a otros sistemas de almace¬ 
namiento en disco (o incluso la 
cinta del Spectrum) es que nos 
ofrece información sobre el tipo de 


archivo que se trae entre manos. 
Para conservar esta útil posibili¬ 
dad, podemos introducirla de for¬ 
ma implícita en el nombre. Si usa¬ 
mos tokens, podemos determinar 
inmediatamente el tipo de archivo 
reservando para ello un único byte 
(carácter) del nombre. Así un pro¬ 
grama en código máquina puede 
caracterizarse por el token «CO- 
DE», las matrices con «DATA». 
Los programas requerirán más le¬ 
tras: «.BSC» para BASIC, o «.TXT» 
para los textos. Así el programa de 
cabeceras puede llamarse «CA- 
BEZ.BSC». Las restricciones en la 
longitud del nombre compensan 
con creces la información que pro¬ 
porciona. 

CAT con 40 títulos; El comando 
CAT no es capaz de dar más de 20 
nombres antes de que aparezca el 
mensaje de «scroll?». El programa 
que proponemos (prog. 3) eleva 
este número a 40, con la contra¬ 
partida de usar un sector de micro¬ 
drive, que borrará de forma auto¬ 
mática al acabar. 

Reducción del tiempo de acceso: 
Para la reducción del tiempo de 
acceso, hay dos posibles estrategias 
a seguir. Una no requiere el em¬ 
pleo de mucha materia gris, y por 
tanto no es óptima. Se trata de ha¬ 
cer varias copias del programa en 
cuestión dentro del mismo cartu¬ 
cho. Esto se realizará cómodamen¬ 
te del siguiente modo: 

POKE 23791, n de copias: SAVE 

El POKE se hace sobre la varia¬ 
ble del sistema COPIES, que guar¬ 
da el número de copias a realizar. 
El valor usual es 1. 

El motivo de la rapidez se debe a 
que, si bien el microdrive tiene una 
velocidad de transferencia bastante 
alta, el tiempo de acceso deja bas¬ 
tante que desear. Reduciendo el 
tiempo que pasa hasta que se loca¬ 
lizan los datos, habremos ganado 
bastante tiempo del total. 

E! segundo método requiere algo 
más de elaboración, pero no supo- 


10 

REM CAT ampliado 


20 

REM 


30 

POKE 23658,8:REM Mayúsculas 


40 

LET M$="Usamos la impresora? (S/N)" 


:go SUB 1000 


50 

IF D*<> M S" AND D$<> ' l N H THEN BEEP 


.1,40:60 TO 40 


ÓO 

LET P$=D$ 


70 

LET M*=“Drive no>> H :G0 SUB 1000 


80 

LET D-VAL D$ 


90 

GLOSE # 10 


100 

OPEN # io; "M H ;D;“?" 


110 

CAT #10;D:REM CAT al drivE 


120 

PRINT KIOJCHRÍ OiCHRÍ OlREM Fin 

del 


CAT 


130 

GLOSE # 10 


140 

OPEN # 10;" M “; D; "?" 


150 

LET A*=" " 


160 

LET A*=A*+INKEY* #10:LET J=LEN 

A$ 

170 

IF CHR* 0 OR A$IJ-1)<> 

CHRÍ 


0 THEN GO TO 160 


180 

GLOSE # io:erase "M"iD;"?" 


190 

LET S=2íIF P$="S“ THEN LET S=3¡ 

REM 


Canal de salida 


200 

FOR A=i TO J-2 


210 

IF A*(A)<> CHR* 12 THEN PRINT #S;AÜ¡ 


(A)i:60 TO 240 


220 

IF A*<A+1)=CHR* 13 THEN PRTNT #S:PR 


INT #S,¡GO TO 240 


230 

PRINT #S, 


240 

NEXT A 


250 

PRINT TAB 10;“Drive:”;D: STOP 


000 

INPUT <M$>;D$:IF D*= HB THEN GO 

TO 1 


000 


010 

RETURN 













ne ningún tipo de contrapartida. 
Sin embargo, sólo podrá usarse en 
cartuchos que tengan previamente 
almacenados pocos programas. 
Cuando se aplica, puede reducir 
significativamente el tiempo de ac¬ 
ceso en programas de varios blo¬ 
ques. Y lo que puede ser más im¬ 
portante, alarga la vida de ¡as cin¬ 
tas, al reducir el intervalo de fun¬ 
cionamiento de éstas. 

Simplemente pretendemos que 
la carga de los programas se realice 
inmediatamente uno detrás de 
otro, sin que sea necesario dar una 
vuelta completa de búsqueda. AI 
acabar de grabar el primer bloque, 
¡a inercia del motor sigue haciendo 
girar a la cinta un cierto tiempo 
(aproximadamente un cuarto de su 
longitud). Al efectuar una graba¬ 
ción, se hace necesario dar una 
vuelta completa a la cinta para 


Es posible obtener catálogos 
con 40 títulos 


buscar los sectores libres. El pro¬ 
grama se empezará a grabar en los 
primeros espacios vacíos que se 
encuentren, esto es. a partir del 
punto donde se paró. Si nosotros 
fuéramos capaces de hacer girar el 
cartucho de modo que la cabeza se 
posicionara justo después del blo¬ 
que a continuación de otro. Como 
se comentaba, el método es sólo 
efectivo si usamos cintas vacías, ya 
que cuando usamos cartuchos con 
varios programas, la asignación se 
hace según el espacio libre con el 
que se cuente. 


Varios Microdrive: Aquellos 
usuarios que disponen de más de 
un microdrive, habrán notado al¬ 
guna vez que si cargan programas 
en BASIC que se auto-ejecutan, y 
el cartucho se halla en una unidad 
distinta de la que se ha grabado, el 
proceso acaba siempre en un de¬ 
sastre. Esto es debido a que la ins¬ 
trucción de carga hace necesaria¬ 
mente referencia a una unidad, 
que puede ser otra distinta de la 
que está funcionando en ese ins¬ 
tante. Para solucionar el proble¬ 
ma. deberá usarse la siguiente ruti- 
ni Ila: 

LET D=PEEK 23766: REM no del 
microdrive en función LOAD 
*“M”; D:“nombre”... 

El PEEK proporciona el núme¬ 
ro de unidad que está funcionado 
en ese momento, y por tanto, la 
que tiene el cartucho con el pro¬ 
grama que se ejecuta. 

Luis M. Brugarolas 
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dato contenido en yy se saque y se 
introduzca en xx. Todos los tipos 
de direccionamiento existentes 
que indicamos en capítulos ante¬ 
riores se pueden usar con esta ins¬ 
trucción, aunque no se permiten 
todas las mezclas. En este capítulo 
y posteriores veremos los que están 
permitidos. 

La otra instrucción que hemos 
comentado es ADD (suma). Esta, 
como su propio nombre indica, 
suma de dos números de un byte. Del 
mismo modo que en la anterior, 
aquí también hay que indicar de 
dónde se sacan los dos números a 
sumar y se puede decir lo mismo 
respecto a los modos de direccio- 
namiento y restricciones existen¬ 
tes. 

Una vez hechas estas indicacio¬ 
nes, hagamos un esquema básico 
del funcionamiento del programa. 
Este esquema nos servirá de base 
para realizar posteriormente diver¬ 
sas variantes en las que veremos 
distintos modos de direcciona¬ 
miento y explicaremos sus venta¬ 
jas e inconvenientes. 

El organigrama básico se da en 
la figura 1. Como se ve su sencillez 
es extrema y se pueden dividir en 
tres pasos principales: 

— Coger el primer número a su¬ 
mar. 

— Sumarle el segundo. 

— Guardar el resultado en la di¬ 
rección de memoria indicada. 

Aunque todas las operaciones se 
podrían hacer en algunos casos en 
varios de los registros de Z-80, va¬ 
mos a usar el Acumulador (A) para 
irnos acostumbrando a usarlo, ya 


otra. Esta instrucción tiene multi¬ 
tud de modos distintos de uso, 
pero en todos ellos detrás del nom¬ 
bre de la instrucción se dan dos pa¬ 
rámetros. El primero indica el lu¬ 
gar donde se va a almacenar el 
dato y el segundo dice de dónde se 
saca. Por tanto, si decimos LD 
xx,yy; estamos haciendo que el 


E n meses anteriores ya dimos 
las ideas básicas de funcio- 
asman namiento del microprocesa- 
— 1 dor Z-80 y aprendimos unos 
conocimientos imprescindi¬ 
bles como son los de convertir de 
decimal a hexadecimal, el sistema 
binario, la estructura interna del 
microprocesador, etc. 

En este artículo vamos a ver al¬ 
gunas de las instrucciones del en¬ 
samblador y su uso, para lo cual 
haremos algunos programas senci¬ 
llos donde se ve cómo usarlas. 


leer en fl el primer 
sumando desde 60500 


Sumar a fl el se 
sumando (60501) 


Una sencilla suma 


Guardar el resultado 
en 60502. 


Nuestro primer programa va a 
realizar una suma de dos bytes y 
nos va a dejar el resultado en una 
posición de memoria de modo que 
luego podamos verlo por medio de 
la instrucción PEEKdel BASIC. 

Para ello vamos a usar dos ins¬ 
trucciones: LD y ADD. La prime¬ 
ra es una abreviatura de «LOAD» 
que significa literalmente «car¬ 
gar», su uso básico es el de mover 
un dato de un sitio a otro, o dicho 
de otro modo, cargar una posición 
de memoria con el contenido de 
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que es el más versátil y el que más 
posibilidades ofrece. 

Supongamos que los dos núme¬ 
ros a sumar son 127 (7Fh) y 42 
(2Ah). El sistema más sencillo y 
rápido (el tiempo que tarda el mi¬ 
croprocesador en hacerlo) de su¬ 
marlos es utilizar el direcciona- 
miento inmediato. Como se recor¬ 


dará, en este tipo de direcciona- 
miento el número que se lee es el 
que se indica en la misma instruc¬ 
ción. De modo que la primera or¬ 
den sería “LD A, 127”. Que hace 
que se earge el número 127 en el 
acumulador. Con lo que el primer 
paso ya está realizado. La segunda 
instrucción a dar es la que hace 
que se sume 42 al número almace¬ 
nado en el acumulador. Para ello 
utilizaremos otra vez el direccio- 
namiento inmediato y haremos 
“ADD A,42”. Que realiza esta 
suma y deja el resultado en el mis¬ 
mo acumulador. Por último, hay 
que guardar este resultado en una 
memoria para que al volver al BA¬ 
SIC podamos recuperarlo. Esto se 
hace con la misma instrucción LD, 
pero cambiando el modo de uso, 
ya que ahora será “LD (dddd),A”. 
Esto indica que el contenido del 


acumulador se almacena en la me¬ 
moria indicada por dddd (que debe 
ser un número entre 0 y 65535). 
Existe también (y la usaremos pos¬ 
teriormente) esta misma instruc¬ 
ción, pero con los parámetros 
cambiados. Es decir “LD A,(dddd)” 
que saca el contenido de la me¬ 
moria dddd y lo mete en el acu¬ 
mulador. La diferencia entre am¬ 
bos tipos de direccionamiento se 
muestra en la figura 2. En 2a se 
ve el direccionamiento inmediato, 
que coge el valor inmediatamente 
posterior a la instrucción y lo guar¬ 
da en el acumulador. En 2b se ve 
cómo este valor (considerado 
como 16 bits) se usa para direccio- 
nar una memoria, cuyo contenido 
es el que se mete en el acumulador. 
En el caso que estamos tratando 
usamos, como ya hemos dicho, 
“LD (dddd), A”, debiendo susti- 
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Memoria 

IDA, 

(dddd) 






Acumulador (A) 


Acumulador (A) 



EA60 

2 

ORG 

60000 

EA60 3E7F 

10 

LD 

A, 127 

EA62 C62A 

20 

ADD 

A,42 

EA64 3254EC 

30 

LD 

160500),A 

EA67 C9 

40 

RET 


EA68 

50 

END 



EA60 

2 

ORG 

60000 

EA60 3A54EC 

10 

LD 

A, (60500) 

EA63 47 

20 

LD 

B, A 

EA64 3A55EC 

30 

LD 

A * (6050 i) 

EA67 80 

40 

ADD 

A, B 

EA68 3256EC 

50 

LD 

(60502),A 

EA6B C9 

60 

RET 


EA6C 

80 

END 



tuir dddd por una dirección de me¬ 
moria. 

Con esto se acaba el programa 
de suma, por lo que añadimos 
como última instrucción una 
«RET», que explicaremos poste¬ 
riormente. Ahora basta saber que 
hace que el control se devuelva al 
BASIC ai acabar el programa. Si 
no la pusiésemos perderíamos el 
control del microprocesador y el 
ordenador se nos colgaría, por lo 
que es imprescindible ponerla 
siempre al final de nuestro progra¬ 
ma. 


El listado completo se muestra 
en la figura 3, en la que se da el lis¬ 
tado producido por el ensambla¬ 
dor usado por nosotros (otros en¬ 
sambladores pueden dar resultados 
ligeramente diferentes) y que da 
tres columnas. En la primera se ve 
la dirección donde se meten los có¬ 
digos generados (y, por tanto, don¬ 
de va el programa), en la segunda 
se ven dichos códigos en hexadeci- 
mal y en la tercera las instruccio¬ 
nes en ensamblador que hemos 
metido y que se corresponden a di¬ 
chos códigos. En este listado se 


puede ver que el programa se ha 
puesto a partir de la dirección 
60000 (EA60h) por medio de un 
«ORG 60000». Esto no es una ins¬ 
trucción del Z-80, sino que le dice 
al microprocesador que empiece a 
meter las instrucciones a partir de 
dicha dirección. También se ve 
que el resultado se almacena en la 
memoria 60502, aunque podía ser 
en cualquier otra que no use el 
Spectrum ni nuestro programa, ya 
que entonces ai guardar el dato bo¬ 
rraría lo que hubiese antes, pu- 
diendo producirse resultados ines¬ 
perados y bastante desagradables 
en general. 

Una vez hecho esto es conve¬ 
niente salvarlo en cinta (por lo que 
pueda pasar) y volverlo a cargar 
cuando queramos ejecutarlo (el 
método de salvarlo en cinta es dis¬ 
tinto para cada ensamblador, por 
lo que es conveniente leerse las 
instrucciones. Aquellos que no 
dispongan de esta utilidad pueden 
introducir los bytes de la segunda 
columna del listado por medio de 
un cargador hexadecimal en BA¬ 
SIC, de los que ya han aparecido 
varios en la revista, y salvarlo con 
SAVE”“CODE dddd,) 111”, don¬ 
de dddd es la dirección inicial y 
lili la longitud de los bytes a sal¬ 
var. En primer lugar, y ya desde 
BASIC, haremos un CLEAR 
59999. Esta instrucción le indica 
al Spectrum que desde esa direc¬ 
ción en adelante el espacio está re¬ 
servado y que no lo puede usar. Si 
no la pusiésemos, el ordenador se 
creería que tiene toda la memoria 
para él y podría escribir encima de 
nuestro programa destruyéndolo. 
A continuación se carga el progra¬ 
ma con LOAD”“CODE y una vez 
en memoria se ejecuta haciendo 
RANDOMIZE USR 60000. Des¬ 
pués de teclear esto el cursor vol¬ 
verá a aparecer instantáneamente 
(si todo ha ido bien), y aunque pa¬ 
rezca mentira, se habrá ejecutado 
el programa y el resultado estará 
en la dirección 60502, cosa que 
podemos comprobar haciendo un 
PRINT PEEK (60502), que nos 
mostrará el número 169. 





































Otro método 
más versátil 

El programa, como hemos visto, 
funciona correctamente, pero 
plantea algunos problemas, ya que 
si queremos sumar dos números 
distintos a los indicados, habrá que 
volver a escribir el programa, en¬ 
samblarlo, etc. Evidentemente esto 
no resulta práctico, por lo que hay 
que buscar otro sistema. 

Para evitar que suceda esto, con¬ 
viene separar el programa de los 
datos, es decir, que el programa no 
tenga los datos como parte compo¬ 
nente, sino que los lea de otra zona 
de memoria {a partir de la 60500, 
por ejemplo). Para ello se puede 
usar la instrucción “LD A,{dddd)” 
que vimos antes, y en este caso 
dddd debe indicar dónde está al- 
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macenado el dato. Por ejemplo, 
¡supongamos que en la memoria 
60500 está el primer número a su¬ 
mar, en la 60501 el segundo y el 
resultado lo almacenamos en la 
60502 como antes. Por tanto, el 
proceso a realizar queda como si¬ 
gue: En primer lugar leer el núme¬ 
ro almacenado en la memoria 
60500 y guardarlo en el acumula¬ 
dor. A continuación se le debe su¬ 
mar el contenido de la memoria 
60501. Pero el problema es que 
NO existe una instrucción “ADD 

A, (dddd)’\ que nos sumaría al acu¬ 
mulador el contenido de la direc¬ 
ción dddd, lo que nos obliga a uti¬ 
lizar otro sistema. 

Este otro sistema puede ser el 
pasar el contenido del Acumula¬ 
dor (el primer numero) al registro 

B, meter entonces en A el segundo 
número y sumar A y B. Este proce¬ 


so se complica ligeramente, pero 
nos permite tener los datos separa¬ 
dos del programa. Debido a este 
cambio de funcionamiento hay 
que cambiar dos instrucciones. La 
primera es “LD B,A”, que pasa el 
contenido de A a B. La segunda es 


ADD A,B que suma A y B y deja el 
resultado en A. La parte final es 
como en el listado anterior y el re¬ 
sultado se vuelve a almacenar en 
60502. El listado completo se da 
en la figura 4. 

Para entender mejor el funció- 
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namiento de! proceso de suma se 
puede ver la figura 5, en la que se 
han representado gráficamente los 
registros internos del Z-80 según se 
van ejecutando las instrucciones. 
Como se puede ver, se cargan los 
datos én A y B y luego se suman. 
De este modo ios datos se pueden 
cambiar fácilmente. Para ello, an¬ 
tes de ejecutar el programa (por 
medio de RANDOMIZE USR 
60000) hay que introducirlos por 
medio de POKE 60500,xx con el 
primer número y POKE 6050l,yy 
con el segundo. El resto del proce¬ 
so de funcionamiento es igual al 
primer programa que hicimos. 


Direccionamiento 
con HL 

Este es el tercer tipo de direccio¬ 
namiento que podemos usar para 
nuestra suma. Las ventajas que nos 
reporta son interesantes debido a 
que nos permite realizar todas las 
operaciones utilizando como refe¬ 
rencia una dirección introducida 
previamente en HL. A este tipo de 
direccionamiento se le denomina 


indirecto, ya que no se da el dato 
(como en el modo inmediato) ni la 
dirección de donde cogerlo (como 
en el direccionamiento directo), 
sino que se dice de dónde se tiene 
que coger la dirección que a su vez 
contiene el dato. En la figura 6 se 
ve cómo al leer la instrucción el 
microprocesador, se le dice que sa¬ 
que el contenido del par de regis¬ 
tros HL y lo use como otra direc¬ 
ción. Por decirlo de otro modo, se 
da una dirección (en este caso se 
indica un registro) que a su vez 
contiene la dirección de donde sa¬ 
car el dato. 

De este modo podemos realizar 
las operaciones de carga y suma, 
ya que el Z-80 sí las admite ha¬ 
ciendo referencia a HL, con el úni¬ 


co condicionante de que al princi¬ 
pio del programa hay que cargar 
en este par de registros la dirección 
donde se encuentran los datos. 
Para ello se recurre a una nueva 
variante del LD, que se escribe de 
la forma “LD HL,dddd”, siendo 
dddd (la dirección de los datos) un 
número de 16 bits almacenado en 
las dos memorias siguientes a la 
instrucción. La razón de que sea de 
16 bits es que esta longitud que tie¬ 
ne HL considerado como un solo 
registro en vez de dos de 8 bits (to¬ 
dos los LD que hemos hecho antes 
eran de 8 bits, ya que éste es el ta¬ 
maño de las memorias y de los re¬ 
gistros A y B del microprocesador). 
El valor que introduciremos en HL 
será 60500. 
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Una vez hecho esto podemos 
pasar a realizar el cálculo propia¬ 
mente dicho. En primer lugar se 
lee el primer dato, que se encuen¬ 
tra en la memoria 60500, por lo 
que basta hacer “LD A,(HL)“ y se 
nos carga automáticamente el con¬ 
tenido de dicha memoria, ya que 
está apuntada por HL. Para sumar 
el segundo dato hemos de hacer 
“ADD A,(HL)’\ pero este dato 
está en la memoria 60501, mien¬ 
tras que según hemos visto HL 
apunta a 60500, por lo que habrá 
que incrementarla previamente de 
modo que apunte a este segundo 
dato; esto se hace de un modo muy 
sencillo, ya que hay una instruc¬ 
ción específica del Z-80 que hace 
exactamente lo que queremos; in¬ 
crementar HL en uno. Esta ins¬ 
trucción se llama, evidentemente, 
INC HL. Una vez ejecutada ésta 
podemos realizar la suma. 

Por último, para guardar el re¬ 
sultado podríamos hacerlo como 
en las versiones anteriores del pro¬ 
grama, pero en su lugar vamos a 
utilizar también HL, En primer lu¬ 
gar lo incrementamos de nuevo 
haciendo que señale a 60502 (el lu¬ 
gar donde queremos almacenar el 
dato) y a continuación hacemos 
“LD (HL),A” de funcionamiento 
similar a otras veces, pero en este 
caso no se indica la dirección, sino 
que se halla indicada por HL. Para 
terminar se pone como es habitual 
el “RET”. En la figura 7 se mues¬ 


tra el listado resultante. El uso es 
igual que en caso anterior (ya que 
sólo se ha modificado la estructura 
interna del programa, pero no el 
modo en que entran y salen los da¬ 
tos) y los datos se introducen ha¬ 
ciendo POKEs en 60500 y 60501 y 
el resultado se saca con un PEEK 
de 60502. 

El direccionamiento 
indexado 

Este es el último tipo de direc¬ 
cionamiento que vamos a estudiar 
como aplicación práctica de nues¬ 
tro programa de suma. Su funcio¬ 
namiento es muy similar al indi¬ 
recto que hemos visto con HL, 
pero con dos diferencias principa¬ 
les. La primera es que en lugar de 
utilizar el par de registros HL, va¬ 
mos a usar los IX (también se po¬ 
drían usar los IY) y la segunda es 
que el Z-80 nos permite que en la 
misma instrucción se le sume al 
contenido de este registro un nú¬ 
mero de un byte para hallar la di¬ 
rección definitiva. Es muy impor¬ 
tante tener en cuenta que esta 
suma sólo se hace para hallar la di¬ 
rección y no se modifica el conte¬ 


nido de IX. Es decir, si hacemos 
“LD A,(IX+2)” y en IX hay un 
60500, se nos cargará en el acumu¬ 
lador el contenido de la memoria 
60502 (60500+2), pero en IX se¬ 
guirá estando 60500, de modo que 
lo podemos usar posteriormente 
para leer o escribir otras direccio¬ 
nes de memoria. Por tanto, el pro¬ 
ceso es similar al anterior, pero 
simplificado, ya que no hace falla 
incrementar IX debido a que el 
desplazamiento se incluye en la 
instrucción. El programa se lista 
en la figura 8, en la que podemos 
ver cómo el primer dato se lee con 
“LD A,(IX+Ó)” al estar en la mis¬ 
ma memoria 60500, el segundo 
dato se suma con “ADD A,(IX+1)” 
para que se lea la dirección 60501 
y el resultado se guarda con “LD 
(IX+2),A” de un modo similar al 
programa anterior, pero incluyen¬ 
do el desplazamiento. 

Con esto quedan explicados los 
distintos modos de direcciona¬ 
miento y su utilización práctica en 
este caso. El mes que viene vere¬ 
mos como se puede realizar restas 
y sumas de números mayores por 
medio del uso de la bandera de 
acarreo. 

Fernando García 
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QL también para ¡ligar 

D-Day, Super 
Backgammon 


Novedades 

calientes: 

Reducción 
del precio 


a la mitad 
Discos de 













El QL baja de precio 


Un disco para 
ahorrar infartos 



A comienzos del verano, 
todo auguraba problemas para 
Sinclair: los grandes stocks sin 
vender repercutieron en una 
falta de liquidez de la empre¬ 



sa,que no podía hacer frente a 
sus deudas. La solución mila¬ 
grosa, llamada Maxwell, con¬ 
sistía en la capitalización por 
parte de este editor inglés, a 
cambio de la cesión del con- 


Más aplicaciones: Nómir 

Cuando, el mes pasado, pa¬ 
samos revista a los programas 
de aplicación de origen espa¬ 
ñol que iban apareciendo, no 
nos había llegado todavía el 
programa de nóminas de 
WorldMicro. Se trata de una 
aplicación escrita sobre AR¬ 
CHIVE, con cuatro bases de 
datos relacionadas: contienen 
el Convenio colectivo, los da- 


trol de la compañía, Este com¬ 
promiso dejó respirar a sir Cli- 
ve hasta el verano. 

Pero a primeros de agosto 
Sinclair anuncia que ya no ne¬ 
cesita el acuerdo con Maxwell, 
y se rompen las negociaciones. 
El tio Clive ha firmado un 
acuerdo con una cadena de 
tiendas de electrónica, por el 
que éstas adelantan dinero a 
cambio de descuentos sobre 
las ventas. El siguiente golpe 
de su agresiva estrategia fue 
bajar a la mitad el precio del 
QL: de 400 a 200 libras, con 
fecha de dos de septiembre. 
Investrónica no ha tardado en 
reaccionar, y ha puesto el pre¬ 
cio de la máquina española, 
que costaba 125.000 pesetas, 
en 79.000 pesetas. Buenas no¬ 
ticias para los que todavía no 
han pasado por la tienda. 


tos de la Seguridad Social (Ba¬ 
ses y Tipos) y el fichero de em¬ 
pleados. respectivamente. El 
programa permite actualizar 
cualquiera de las cuatro y lis¬ 
tar la nómina, los recibos y los 
datos de la Seguridad Social. 

Un programa sencillo para 
una tarea muy mecaniza ble, 
En el listado de recibos está 
prevista la inclusión de inci¬ 


E1 principal problema del 
QL a estas alturas es la depen¬ 
dencia de los microdrives. Si 
bien su calidad ha mejorado, 
siguen ofreciendo una capaci¬ 
dad baja, y no toleran bien el 
esfuerzo que supone utilizar¬ 
los en aplicaciones con gran 
movimiento de datos. Ade¬ 
más, su fiabilidad no llega a! 
standard profesional. Por esta 
razón. Investrúnica comercia¬ 
lizará la unidad de disco «ofi¬ 
cial» Sinclair. Se trata de un 
disco de 3” 1/2 de doble cara, 
con una capacidad de 720K 
formateadas. Los programas 
de Psion versión española tra¬ 
bajan perfectamente con la 
nueva unidad tras una peque¬ 
ña adaptación. 

La unidad incluye en su 
ROM una ampliación del BA¬ 
SIC que proporciona coman¬ 
dos de acceso aleatorio y otras 
ayudas de interés. Importante 
para un uso profesional, por 
su capacidad, rapidez y fiabili¬ 
dad. El precio ha sido fijado en 
93.000 pesetas con controla¬ 
dor. Aunque resulte algo caro, 
más de un usuario respirará 
aliviado. 


dencias. La salida está adapta¬ 
da a los impresos oficiales, re¬ 
quiriendo una impresora stan¬ 
dard de SO columnas. 
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| Jugar con el 




os primeros 
. compradores del 
J ^ QL disimulaban 

su disgusto por la falta 
de software para jugar 
Q diciendo. Que «al fin y 

* al cabo se trata de una 
máquina seria: dispone 
de más compiladores y 
aplicaciones profesio¬ 
nales que ningún orde¬ 
nador de su precio..,». 
Lo cierto es que los 
buenos programas de 
juego tardaron, pero 
van haciendo su apari¬ 
ción. 

Se dispone ahora de 
uno de los mejores pro¬ 
gramas de ajedrez para 
microordenadores (ya 
comentado en un nú¬ 
mero anterior) y de un 
Backgammon bastante 
interesante. Está anun¬ 
ciada, aunque todavía 
no la hemos podido ver 
en España, la versión 
QL del Match Point, el 
mejor juego de simula¬ 
ción tenística. Las fo¬ 
tos de la pantalla dejan 
ver unos gráficos exce¬ 
lentes: esperamos que 
el movimiento sea tan 
bueno como en el 
Spectrum. 

D Day, un juego de 
guerra ya famoso, tam¬ 
bién aparece en una 
generosa versión, con 
dos microdrives que 
forman uno de los jue¬ 
gos de guerra más com¬ 
pletos que liemos visto. 
Por otra parte, han ido 
apareciendo una serie 
de juegos de acción de 
dudosa calidad, sobre' 
todo teniendo en cuen¬ 
ta las grandes posibili¬ 
dades de la máquina. 


Entre ellos podemos 
citar Star Guard & Ga- 
lactic Invaders, un mi- 
crodrive con dos jue¬ 
gos, de los que el pri¬ 
mero es realmente 
malo, con un movi¬ 
miento muy difícil y 
una dinámica que, 
aunque a priori atracti¬ 
va. queda oculta tras la 


dificultad para mover 
nuestro láser. Galactic 
Invaders es una versión 
(¡otra!) del viejo Space 
Invaders; el juego es 
simpático, y la idea, 
una de las más explota¬ 
das de la historia del 
software, sigue siendo 
atractiva a pesar del 
tiempo transcurrido. 


Night Nurse es otro 
juego que no pasa el 
listón mínimo de cali¬ 
dad: se trata de acom¬ 
pañar las andanzas de 
una Enfermera en su 
guardia. llegando hasta 
una fiesta que se cele¬ 
bra en una de las salas 
del hospital. Lento y 
poco elaborado, lo úni¬ 
co bien resuelto es el 
movimiento de los per¬ 
sonajes. 

Comentamos a con¬ 
tinuación dos de estos 
programas: Super 
Backgammon, y D 
Day. Ambos nos han 
parecido lo mejor que 
ha llegado a nuestras 
manos hasta el mo¬ 
mento, Afortunada¬ 
mente, parece que el 
déficit de juegos se va 
llenando poco a poco, 
y que en futuros núme¬ 
ros podremos ampliar 
este breve catálogo. 


















QL D- 




Hay dos tipos de 
usuarios de ordenado¬ 
res: los que disfrutan 
con los Juegos de Gue¬ 
rra y los que no. Para 
los fanáticos de la es¬ 
trategia, debe ser bien¬ 
venido el lanzamiento 
de D-Day en su ver¬ 
sión QL. Ha sido éste 
uno de los primeros 
programas que han lle¬ 
gado a llenar la caren¬ 
cia de programas de 
juego para esta máqui¬ 
na. 

Producido por Ga- 
mes Workshop y distri¬ 
buido en España por 
Serma, el Día D parti¬ 
cipa de todas las carac¬ 
terísticas de los juegos 
de guerra clásicos, y la 
l mayor memoria del 
QL ha permitido in¬ 
corporarle una gran 
variedad de nuevas op¬ 
ciones. Los fanáticos 
de la estrategia y la tác¬ 
tica disfrutarán, sin 
duda, con este progra¬ 
ma, ya que se puede ju¬ 
gar contra un contrin¬ 
cante humano, usando 
el ordenador para en¬ 
cargarse dei trabajo pe¬ 
sado, y así poder con¬ 
centramos en el juego, 
o bien luchar contra la 
máquina, con opciones 
algo más limitadas. 

Se trata de una simu¬ 
lación del combate tác¬ 
tico en la Segunda 
Guerra Mundial, en 
i los momentos que si¬ 
guieron al desembarco 
de Normandia. Dispo¬ 
nemos de cuatro esce¬ 
narios, con objetivos 
distintos para cada 
ejército, y se pueden 
seleccionar con gran li¬ 
bertad' las condiciones 
iniciales de la batalla. 

En caso de combatir 
dos jugadores, pueden 
elegir entre «compran) 
sus ejércitos o utilizar 
i las opciones por defec¬ 


to del programa que 
incluyen selección en¬ 
tre ejércitos de 15 a 50 
unidades. T ambién 
podemos, en este caso, 
colocar nuestras uni¬ 
dades en la disposición 
que deseemos. Si juga¬ 
mos contra el ordena¬ 
dor, en cambio, sólo 
podremos elegir entre 
dos ejércitos de 15 ó 50 
unidades y jugar en el 
bando aliado o alemán. 

El tiempo se suele 
convertir en un condi¬ 
cionamiento impor¬ 
tante en los juegos de 
guerra, ya que no re¬ 
sulta fácil acabar la 
partida, incluso con el 
ejército más pequeño, 
en manos de un par de 
horas. Para no dejar las 
partidas a medias se 
nos da la opción de sal¬ 


var el juego en micro- 
drive; al volver a 
arrancar el programa 
continuaremos auto¬ 
máticamente donde lo 
dejamos. 

Como se nos anun¬ 
cia en la carátula, el 
juego contiene casi 
200K de programa y 
datos, con alrededor de 
20K dedicadas a «inte¬ 
ligencia artificial». 
Con esos tamaños, los 
tiempos de carga son 
grandes, ya que el pro¬ 
grama lee gran canti¬ 
dad de datos de los dos 
cartuchos. El primero 
contiene los progra¬ 
mas, mientras que en 
el segundo se almace¬ 
nan los mapas y carac¬ 
terísticas de las unida¬ 
des. 

Durante el período 


de carga se puede elegir 
entre uno o dos jugado¬ 
res, así como el tipo de 
ejército que se va a uti¬ 
lizar. En la selección 
de unidades el progra¬ 
ma resulta una vez más 
muy completo, con 
más de diez tipos en 
cada bando, incluyen¬ 
do barcos de transporte 
y camiones, que pue¬ 
den mover con rapidez 
nuestros efectivos. 
Existen diferentes uni¬ 
dades de carros de 
combate, que difieren 
en capacidad ofensiva, 
precio y prestaciones. 
Para seleccionar nues¬ 
tra fuerza de invasión, 
el programa nos da di¬ 
nero en proporción al 
tamaño del cuerpo de 
ejército. Si lo gastamos 
sin cumplir nuestro 
número de unidades, el 
ordenador nos propor¬ 
ciona unidades de in¬ 
fantería ligera hasta 
completar el número 
preestablecido. Asi po¬ 
demos elegir entre un 
ejército equilibrado o 
bien otro con unas po¬ 
cas unidades selectas y 
un gran número de ba¬ 
tallones de infantería 
ligera, de pocas posibi¬ 
lidades en combate. 

Es en la dinámica 
del juego donde se le 
pueden poner las 
mayores objeciones: el 
movimiento de las uni¬ 
dades se realiza situan¬ 
do el cursor sobre cada 
una, eligiendo la mo¬ 
dalidad (manual o au¬ 
tomático), y eligiendo 
la dirección de cada 
paso (modo manual) o 
del movimiento entero 
(automático). El prin¬ 
cipal problema es que 
el posicionamiento del 
cursor resulta algo len¬ 
to, y no disponemos 
de ningún sistema 
para posi donamos rá- 






















pidamente sobre el 
mapa. 

Con una presenta¬ 
ción satisfactoria, unos 
gráficos muy correctos 
si disponemos de TV 


color (en blanco y ne¬ 
gro resultan algo más 
confusos, aunque se 
distinguen los distintos 
tipos de terreno sin di¬ 
ficultad), y, como pun¬ 


to más débil, un movi¬ 
miento algo lento por 
el mapa. Creemos que 
hará las delicias de los 
aficionados a estos jue¬ 
gos e incluso puede lla¬ 


mar la atención a las 
personas que nunca 
han jugado a la guerra. 
En cualquier caso, 
conviene no tomárselo 
demasiado en serio. 


QL Super Backgammon 



A pesar de que los 
investigadores en Inte¬ 
ligencia Artificial con¬ 
centraron sus esfuerzos 
en juegos inteligentes 
como el ajedrez, pron¬ 
to se dieron cuenta de 
que resultaba muy difí¬ 
cil introducir elemen¬ 
tos de análisis de posi¬ 
ción con cierto éxito. 
Hace alrededor de cin¬ 
co años se eligió el 
Backgammon como 
juego ideal, por la sim¬ 
plicidad de sus reglas, 
para lograr un progra¬ 
ma «experto», guiado 
por ideas generales, 
que permitiera un jue¬ 
go realmente bueno. 
Este programa derrotó, 
con sorprendente faci¬ 
lidad, ai Campeón del 
Mundo de la especiali¬ 
dad, siendo el primer 
juego en el que se lo¬ 
graba algo parecido. 

El programa que nos 
ofrece Digital Preci¬ 
sión, y en España Ser- 
ma, no llega a tanto: un 
jugador medio le vence 
con cierta facilidad en 
el nivel más alto, aun¬ 
que es una buena he¬ 
rramienta para apren¬ 
der las sutilezas de este 
juego, mucho más difí¬ 
cil de lo que parece. El 
juego consiste en cru¬ 
zar, cada jugador en di¬ 
rección contraria, el ta¬ 
blero. Se puede comer 
las piezas que queden 
aisladas, y cada juga¬ 
dor puede sacar sus 


piezas del tablero 
cuando consigue intro¬ 
ducirlas todas en su 
cuadrante. Gana el pri¬ 
mero que saque todas 
sus piezas. 

El programa ofrece 
una novedad curiosa: 
incluye un documento 
QUILL donde se expli¬ 
can con detalle las re¬ 
glas del juego. Una vez 
arrancado debemos de¬ 
cidir si el ordenador 
juega contra sí mismo, 
si juegan dos personas 
o si hemos decidido 
enfrentamos contra él. 
En este caso podemos 
elegir el nivel, desde 
uno a seis. 

Se nos permite tirar 
los dados a nosotros o 
bien fiamos de las tira¬ 
das del ordenador. Por 


otra parte, existe una 
opción para que el pro¬ 
grama enseñe las juga¬ 
das que está conside¬ 
rando en cada momen¬ 
to. 

En cuanto a la cali¬ 
dad de su juego, el pro¬ 
grama se porta bastan¬ 
te bien, aunque se le 


puede derrotar con fa¬ 
cilidad cuando conoce¬ 
mos sus debilidades. 
En determinadas situa¬ 
ciones su juego es de¬ 
masiado conservador, 
por lo que un plantea¬ 
miento ambicioso aca¬ 
bará con él sin proble¬ 
mas. 
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Graphiql. Para dibujo artístico 


El QL es una máqui¬ 
na con grandes posibi¬ 
lidades gráficas. EA- 
SEL. el programa de 
dibujo de Psion, es una 
buena prueba de ello. 
También el SuperBasic 
dispone de unas exce¬ 
lentes instrucciones 
gráficas. Pero no había 
aparecido hasta ahora 
ningún programa que 
explotase ias posibili¬ 
dades «artísticas» del 
ordenador, Graphiql. 
de Talent y distribuido 
por Serma, es el primer 
programa de dibujo 
que ha llegado a nues¬ 
tras manos. 

Graphiql trabaja en 
el modo de baja resolu¬ 
ción de la máquina 
(256 x 256 puntos, con 
ocho colores), y resulta 
muy potente aunque, 
como veremos, tam¬ 
bién es difícil de domi¬ 
nar. 

Tras la carga del 
programa nos encon¬ 
tramos con una panta- 

0*6 


lia negra, donde apare¬ 
ce una pequeña cruz de 
color blanco: el cursor. 
En el uso más sencillo, 
podemos usar un joys- 
tick (o las teclas del 
cursor) para mover el 
cursor. Si usamos si¬ 
multáneamente la ba¬ 
rra espaciadora (botón 
de disparo), el cursor 
irá dejando un trazo 
del color activo. Si in¬ 
troducimos PT, los 
movimientos del cur¬ 
sor dejarán la traza 
aunque no pulsemos la 
espaciadora. Para cam¬ 
biar el color, basta pul¬ 
sar la tecla correspon¬ 
diente a éste (0-7). El 
comando más útil para 
el principiante es H, 
que nos presenta unas 
cuantas páginas de 
ayuda, en las que apa¬ 
rece una breve descrip¬ 
ción de cada comando. 

Dos modos de dibujo 
en la pantalla, el nor¬ 
mal y el XOR, en el 
que el color que apare¬ 


ce en la pantalla es 
función de la tinta ac¬ 
tual y el color previo 
en la pantalla, nos per¬ 
miten obtener curiosos 
efectos. Asimismo, el 
programa dispone de 
comandos para dibujar 
líneas, círculos, elipses 
y rectángulos. En todos 
los casos, el programa 
nos deja ver las carac¬ 
terísticas del dibujo se¬ 
gún se realiza, pudien- 
do abortar el comando 
si el resultado no es sa¬ 
tisfactorio. 

Para posi donamos 
en la pantalla con más 
precisión, el programa 
dispone de un índice 
de la posición actual, 
el color seleccionado y 
otras características. 
Este índice se puede 
eliminar de la pantalla 
o cambiar de posición. 
Otra opción interesan¬ 
te es la de zoom, que 
permite 16 aumentos 
para afinar nuestra co¬ 
locación en la pantal la. 


Hasta aquí el progra¬ 
ma, aunque potente, 
no se diferencia en 
nada de programas de 
dibujo convencionales 
para otras máquinas. 
Pero los comandos de 
bloques y texturas y 
otras opciones multi¬ 
plican su potencia. 

Las texturas consti¬ 
tuyen ya un importan¬ 
te avance sobre los 
programas convencio¬ 
nales: se nos permite 
definir hasta 26 zonas 
rectangulares en una 
paleta auxiliar que 
aparece en la parte in¬ 
ferior de la pantalla y 
memorizarlas, para 
luego repetirlas en 
nuestros dibujos. 

Casi todos los pro¬ 
gramas de dibujo dis¬ 
ponen de una opción 
para rellenar áreas de 
un color. Graphiql va 
mucho más allá: el co¬ 
mando FA rellena de 
blanco una zona de la 
pantalla y la mernori- 




























za. Una vez acabado el 
proceso, los comandos 
de rellenado se referi¬ 
rán a ese área. Si, por 
ejemplo, tecleamos 
FC, la zona aparece di¬ 
bujada en el color acti¬ 
vo. Eligiendo otro co¬ 
lor y repitiendo el co¬ 
mando, se obtiene un 
cambio de la zona al 
nuevo color. Por últi¬ 
mo, si introducimos 
FT. el programa volve¬ 
rá a rellenar la zona,, 
esta vee con la textura 

* activa. Así se pueden 
sombrear o «empape¬ 
lar» nuestros dibujos 

• sin perder gran canti¬ 
dad de tiempo. Las tex¬ 
turas disponen de otra 
opción muy interesan- 
tef se le puede indicar 
al programa que utilice 
sólo parte de los colo¬ 
res que la componen. 
Así, una figura sobre 
fondo negro, si 1c deci¬ 
mos al programa que 
no use el color negro, 
aparecerá sobre el fon- 


Colours c*r~« tatacUd by the dlQtts 

ü " ir m 

0 Black I 

2 .3 

5 5 Cyan 

6 YtlI qu i 7 Uhtte 

CdiQít Changa th« cursor colour 

The coloúrs of plxal* In the current 
b l ock can be changad by the eominonds: 

CS Co l our Suap 

CMí Co l our Han-ge 

Both are fol loued by a patr of digiU 
The-s-e g i ue the co l our-*. to be suapped 
or itterged. 

MORE 


do del dibujo sin alte¬ 
rar el resto de éste. 

Otra opción intere¬ 
sante es la posibilidad 
de usar «aerógrafo» en 
nuestros dibujos. Esta 
opción consiste en que, 
cada vez que cambia¬ 
mos de posición el cur¬ 
sor, el programa dibuja 
una serie de puntos 
aleatorios del color ac¬ 
tivo alrededor. Este 
efecto simula un aeró¬ 
grafo al que se le estu¬ 
viera acabando la pin¬ 


tura y elimina la preci¬ 
sión de trazado. 

Un programa que 
supera en mucho las 
posibilidades de las 
utilidades de dibujo de 
otros ordenadores, con 
funcionamiento rápido 
de sus opciones. El 
principal inconvenien¬ 
te es el modo de co¬ 
mandos, ya que la pan¬ 
talla no hace eco de las 
letras introducidas, lo 
que multiplica las po¬ 
sibilidades de error, y 


hace que cueste trabajo 
familiarizarse con el 
programa. Una vez se 
profundiza en su uso, 
Graphiql resulta una 
herramienta realmente 
profesional, que expri¬ 
me las posibilidades 
gráficas de la máquina. 
Si el proceso de selec¬ 
ción de comandos se 
realizase medíante un 
menú gráfico, el pro¬ 
grama merecería un 10. 
En su forma actual, se 
queda con un notable. 
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CUBYQL 

LA PAREJA 
PERFECTA 


Este monitor en color 

CUB es TOT ALMENTE 
comp atible jon el Sin¬ 

clair QL. _ 

Combina las cap acida¬ 
des de gráficos destaca¬ 
dos con l a facilidad de 
visualizar textos en 85 
columnas mientras hace 

justicia a l pot encial de 
color del QL, Su nuevo 

diseño diotado de un a ba¬ 

se basculante y giratoria 
armoniza perfectamente 
con la simple apariencia 
funcional del QL. 

Lo mejor de todo, es su 

precio, solo de 


91.600 


P.V.P. 


ESPECIFICACIONES 

MODELO-CUB 

1451/DQT3 

MONIT OR DE 14" _ 

ENTRADA - RGB/TTL 
RESOL UCION - 653 (H) 

X 585 (V) 

DOT PICH - 0,43 mm. 
ANCHO DE BAND A 

18 MHz__ 

AÑTIREFLEJO CRT 



CUB 1451/ 



CUB 1451/DQT 3 

CON BASE BASCULANTE Y GIRATORIA 






MICROIHTECB 



COLOUR MONITORS 


© 


multilogic 


P- de la Habona, 145 
Telf.458 74 75 -28036 Madrid 


















































































Un nuevo operativo ® 
para el Spectrum 


Este mes comenzamos a daros el listado ensamblador del programa, ampliamente 
comentado , con lo que los que lo deseéis podréis modificarlo introduciendo nuevos 
comandos o cambiando los ya existentes, tanto los nuevos del programa como los antiguos 

del BASIC. 


I ntes de comenzar hay que 
hacer una advertencia a los 
! L m. que hayan preferido esperar 
para teclear el programa de¬ 
sensamblado en lugar de las 
largas líneas de DATAs del mes 
pasado. El programa es muy largo 


y en algunos ensambladores puede 
presentar problemas para manejar 
en memoria todo el código fuente. 
Por ejemplo, si usáis el GENS3M2 
de HISOFT tendréis que recurrir a 
ensamblar parte del código desde 
microdrive o cinta. En el de AR- 


TIC si cabe todo el código (dejan¬ 
do aparte las interrupciones, que 
son un módulo totalmente inde¬ 
pendiente), pero tiene el inconve¬ 
niente de que el código objeto debe 
ocupar las mismas direcciones que 
el ensamblador, y éste se destruye. 
Si usáis este ensamblador tendréis 
que ensamblar en otra dirección y 
luego ingeniároslas para reubicar¬ 
lo. De todas formas os damos tam¬ 
bién un listado de la tabla de eti¬ 
quetas para que cada uno pueda 
trocear el programa como más le 
guste y poder así ensamblar a ca¬ 
chos. 


La idea 

La idea de escribir este progra¬ 
ma surgió ojeando el libro «The 
complete spectrum ROM disas- 
sembly», y pensando en las impor¬ 
tantes mejoras que podrían intro¬ 
ducirse si pudiéramos modificar 
un poco el programa de la ROM. 
Pero esto no era posible, y la única 
alternativa era copiar las partes 



Manuel Arana (a la derecha) con Pedro 
Verduras. Ambos son estudiantes de la 
Escuela Técnica Superior de Ingenieros 
Industriales de Madrid y comparten su 
afición por el Spectrum. 
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GR 6 

~£AFF 


O 

DEFW 

INT 

EI v e c t o r dp ínter r u p c i □ n a p un t. a 




«ti comieiuc de la rutina. 

f 

I NT PUSH 

AF 

Guard a 1 os regí s t r es en la pila 

4 

PUSH 

HL 

durante la. i nterrupc i on . 

5 

L.D 

HL,< A 5C78) 

Incrementa el centeñid o de 1 a 

Ó 

INC 

HL 

var i ab1e del sistema FRAMES„ 

7 

LD 

í' fc SC78> , HL 


a 

LD 

A „ H 


9 

DF, 

L 


10 

JR 

NZ , KEYIN7 

y el tercer byte si es necesario 

1 3 

INC 

UY+64) 


12 

KEVTNT Fl'SH 

EC 

6uarda 1 as damas registros. 

13 

PUSH 

DE 
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fundamentales en RAM y realizar 
ahí los cambios. Para empezar es 
necesario hacernos con el control 
del bucle principal que se encarga 
de llamar a las rutinas que realizan 
las funciones más importantes, 
como podrían ser el pedirnos la in¬ 
troducción de una línea BASIC, 
analizarla o ejecutarla. A partir de 
ahí podríamos ir sustituyendo las 
rutinas necesarias para la correcta 
interpretación de los nuevos co¬ 
mandos. Además para que éstos 
puedan ser tecleados directamente 
hay que hacerse con el control de 
las interrupciones. Y ya puestos a 
construir un nuevo sistema, ¿por 


qué no dotarle de un modo de pre¬ 
sentación de 64 caracteres? Apa¬ 
rentemente no presenta muchos 
problemas, basta con hacer que el 
canal «S» apunte a la dirección 
donde se encuentra la rutina de 
presentación cuando se seleccione 
este modo. Sin embargo, nos en¬ 
contramos con que en bastantes 
puntos se vuelve a colocar como 
dirección de salida la normal de la 
ROM. Por esta razón tuvimos que 
arreglar muchas rutinas relaciona¬ 
das con la escritura, como la que 
produce los listados automáticos o 
borra la pantalla. Esta es una de las 
causas que hicieron que el progra¬ 


ma sea mucho más largo de lo pen¬ 
sado en un principio. 

Para que los nuevos comandos 
sean interpretados correctamente, 
lo primero que necesitamos es 
asignarles un código por el que 
puedan ser identificados dentro de 
un programa BASIC. En el libro de 
instrucciones encontramos una su- 
gerente oferta. Los códigos 24 a 31 
no están utilizados. Aquí hay sitio 
para introducir hasta ocho nuevas 
palabras clave. Sin embargo, luego 
descubrimos que estos códigos en 
realidad son utilizados interna¬ 
mente por la rutina que lee el te¬ 
clado para indicar que ha sido pul¬ 
sada una combinación de teclas 
correspondiente a cambio de tinta. 
Esto tuvo que ser modificado para 
hacerlo compatible con el nuevo 
sistema. Por esta razón cuando 
está conectado el Interface I (las 
interrupciones se tratan normal¬ 
mente) las palabras clave aparecen 
en lugar de los códigos de cambio 
de tinta. Los códigos al final han 
quedado de la siguiente forma: 

24.- ELSE 

25 - ON ERR 

26. -AUTO 

27. - RENUM 

28. -ON 

29. -SWAP 

30. - MODE 

31 - 

Este último no se utiliza para 
nada y simplemente está como un 
posible octavo comando. De todas 


14 


CALL 

KBGARÍ) 

L se ©1 t e c 1 a el o. 


15 


JP 

y “ 004 D 

M i i e 1 v & 1 a. R 0 li d q nde re c u ¡ ¿ e r a 





los registros y acaba la r 

u.i i n a. 

16 

KBÜARD 

CALL 

UU. "> O 

■J x... Cf 

L1 ama a KE Y-SCAN. 


17 


REI 

NI 

Acaba si no hay ninguna 

t ©el a 





pulsada o hay mas de das. 


18 


LD 

HL. f “5C00 

Prim©r grupo i e vari ables. 


■í O 

K 3 L 0 UF 

BIT 

7,(HL) 

Comprueba que esta iibre. 


20 


JE: 

NI,KCHSET 



21 


INC 

HL 





DEC 

(HL í 

Decrementa al contador de 

numero 

I ‘ u| ' 


DEC 

HL 

de pasadas. 


24 


JP 

NI,KCHSET 

Deja el grupo libre si ya 

se han 



LD 

(HL) , ' V FF 

cumplido las 5 pasadas. 
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formas el número de éstos no está 
limitado a 8, ya que tenemos los 
códigos 0 a 5 en las mismas condi¬ 
ciones, y además en caso de necesi¬ 
tar todavía más códigos podríamos 
hacer que uno de ellos sirviera de 
prefijo para los demás. El límite 
está en vuestra imaginación. 

Como, ya hemos dicho antes, 
para escribir el programa utiliza¬ 
mos el libro del listado de la ROM, 
y he procurado respetar en el lista¬ 
do los nombres de las rutinas que 
aparecen en él. Quizás pecando en 
ocasiones de abreviar las abrevia¬ 
turas. 


Interrupciones 

El tratamiento de las interrup¬ 
ciones está en primer lugar en el 
programa por la necesidad de colo¬ 
car el vector de interrupción en 
una dirección concreta. Cuando el 


Z-80 se encuentra en el modo de 
interrupción 2 la dirección de la 
rutina se forma por el registro 1 
como parte alta y por el dato sumi¬ 
nistrado por el dispositivo inte¬ 
rruptor como parte baja. En el 
caso del Spectrum este dato es 
siempre FF. En nuestro progra¬ 
ma el vector queda en la dirección 

EAFF y apunta a la rutina que 
está justo a continuación. 

En cuanto a la rutina en sí es 
prácticamente igual a la de la 
ROM y sólo se diferencia en dos 
detalles, la forma de pasar los códi¬ 
gos de cambio de tinta y el desdo¬ 
blamiento del modo extendido. 

Con el Spectrum funcionando 
normalmente, si se pulsa en modo 
extendido la tecla CAPS-SHIFT y 
un número entre 0 y 7, la rutina K- 
DEC’ODE devuelve como código 
de la tecla pulsada un valor entre 
24 y 31 para indicar que se trata de 
cambio de tinta {24 para 1NK 0 y 


31 para INK 7). De la misma for¬ 
ma utiliza los códigos 16 a 23 para 
indicar cambio de papel, pero és¬ 
tos no nos importan. La solución 
adoptada en el programa para que 
estos datos no sean confundidos 
con ¡os códigos de las palabras cla¬ 
ve es devolver el dato 16 para ios 
cambios de tinta y el 17 para los de 
papel, e indicar el color seleccio¬ 
nado dejando su número en la va¬ 
riable del sistema KDATA. Aquí 
había un pequeño error en el lista¬ 
do de DATAs y cuando queríamos 
cambiar de tinta cambiaba el papel 
y al revés. Si queréis solucionarlo 
basta con hacer POKE 60355,192. 

La otra diferencia está en la mis¬ 
ma asignación del teclado. Había 
que hacerla de forma que no desa¬ 
pareciese ninguna de las funciones 
ya existentes. Para ello recurrimos 
a desdoblar el modo extendido. 
Cuando se quiere acceder, por 
ejemplo, a la instrucción VERIFY 
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KCHSET LD 

A,L 





Lu- 

HL,“5C04 

RiSp i ti © 1 á 

op er a i i o n c an &l c t 

- . \ 

28 

CR 

L 

conjLtrí+o d 

0 “C i A7 I ©s M 


29 

JE 

NZ,KBLQOP 




30 

CAL!... 

. -031E 

H-TEST se 

e: ■.... a r g a J e c b t e n © '■ 

E 




c a-i i eje de 

■i «? t © ‘Z i a p V. .1 S £> □ «al - 
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FE 7 

NC 

o u e I y © 

I a comb i. i en 

d E 




teclas no 

es v«3 .• da. 


T 

i r- 

hr-. 4n 

mí c -rr,r. 

■ > r„ |[ « . 5 

Gompr aeba 

si. ] a tecl a ye esta 

b a 

"T -f 

rp 

í HL > 

antes en e 

1 primer grupo, 


34 

Tr i*”. 

■J 1 

1 , *0310 




35 

EX 

DÉ, HL 




3 6 

LD 

HL,, "*5004 

t í ©n ® 1 s eq un d o * y & i es a 

3 1 

37 

/“v rv 

3 r " 

í HL) 

S 3. 1 t 3 -3. 1 á 

F; G M d o n d fe con si ci e 

r a 

38 

■■¥ r-. 

1 1 r 

Z,*0310 

1 a rep©tic 

i en n 


39 

BIT 

7, (HL) 

M 1 K ' 3. ■=?. y'9r 

si alguno de los d 

oís 

40 

JP 

MIL r-'NEW 

grupo de 

v a r i ¿i. b 1 e 35 . e <•» t, a 

r e 

4 1 

EX 

DE j, HL 

para una n 

L: a 1 '„ & r 1 ¿A „ 


42 

BIT 

7, ÍHL) 




4 3 

p.-~T 

-y 

mi 
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KNEW LD 

E, A 

L g 1 □ c ¿x i a 

n u, ©? v a 1 ", e g i 3 . e n 

a 1 

4 3 

!. r. 

ÍHL),A 

cdñ juiito q 

u.s este libre 
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INC 

HL 
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LD 

< HL ) *05 

contador de 5 pasada» s 


■a 

4 CID 

INC 

HL 




49 

LD 

A,( A 5C09? 

t í ’rííVipO dS 

repetícion 
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Z y Spc¿ Ir Jrn 


000 E 00000 


se 


BS00B0E0E0 
00000000 0B 
HSSHHEHEEH 


hay que hacerlo en modo extendi¬ 
do y pulsando simultáneamente la 
tecla R y cualquiera de los dos 
SHIFTs. La idea básica consiste en 
hacer que esto sólo se pueda hacer 
con uno de ellos (SS) y dejar el otro 
(CS) para introducir las nuevas pa¬ 
labras clave. De esta manera pode¬ 
mos introducir de golpe 26 asigna¬ 
ciones nuevas sobre el teclado sin 
que desaparezca ninguna de las an¬ 
tiguas. La mayor parte de ellas se 
han realizado de forma que coinci¬ 
dan con las antiguas y sólo se han 
cambiado las correspondientes a 
nuestros comandos y a GOTO y 
GOSUB que presentaban algunos 
problemas a la hora de teclear las 
líneas ON-GOTO. La distribución 
en el teclado se ha hecho sin seguir 
ningún criterio especial y por si a 
alguien no le gusta daremos un 
método para redefinirla. Los que 
tecleen el listado ensamblador bas¬ 
ta con que modifiquen las líneas 


76 a 84. Para los que teclearon el 
listado del mes pasado, deben car¬ 
gar el programa y si por ejemplo 
quieren asignar la instrucción 
ELSE a la tecla E deben hacer 
POKE 60233+CODE “E”, 24. Se 
procedería de la misma forma para 


cualquier otra tecla o cualquier 
otra cosa que quisiéramos asignar. 
Cuando acabéis no tenéis más que 
volver a grabar el programa y ya 
tendréis vuestra propia versión del 
programa con vuestras asignacio¬ 
nes. 


5 0 


LD 

(HU , A 


51 


INC 

HL 




LD 

C„ ( XY+ 7 ) 

MQDE 

rr¡' '7 
□ v': 


LD 

D, (IY+1) 

FUAES 

54 


PUSH 

HL 


C-C 

JW 


CALL 

DECODE 

Decodi-fic:a Ja tecla y 



jp 

*•0306 

acaba en ja ROM. 

/ 

DECGDE 

LD 

A , E 


CT r'\ 

u O 


CP 

*3 A 

Salta si. se trata de un numero 

59 


JP 

C,KDIGIT 

jt SPACE , ENTER o al gun SH I FT . 

60 


DEC 

'•n 

Dec r @ manta MDDE 

6 1 


JP 

M, *034F 

salta si es modo K,L o C 

A*"? 


JR 

Zi KELET 

Modo E 

63 


ADD 

A, *4F 

Graphi >::s 

64 


RET 



65 

KELET 

LD 

HL,*01EB 

Base para modo E sin SHIFT 



INC 

B 

Hay algún SHIFT ? 

67 


JR 

Z , LÜQKUF 

salta si no 

68 


LD 

HL,*0205 

Base para modo E + SS 

69 


PUSH 

AF* 


70 


LD 

A „ B 


71 


CP 


Se trata de CAPS SHIFT ? 



JR 

Z . NOCS 

Salta si no 

y *7 


LD 

HL,TABC2-*41 

Base para modo E CE 

74 

MOCB 

PDF 

AF 


7 5 

LOOKUP 

JP 

*034A 

Acaba en la ROM 
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LABERINTO EN 
TRES DIMENSIONES 
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WIZARD 
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AGENDA TELEFONICA 
SKI 

PUZLE 
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BASES EN EL 
L INTERIOR 
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Todo esto solamente es válido 
para los que no utilicen el Interfa- 
ce I, ya que cuando éste está co¬ 
nectado no se utiliza la rutina de 
interrupción. De hecho aquí está 
una de las causas de incompatibili¬ 
dad con el interface. En el trata¬ 
miento de las interrupciones se 
utilizan varías rutinas de la ROM 
que cuando ésta es paginada por el 
interface no se encuentran en su si¬ 
tio, lo que provoca que la máquina 
se «cuelge» al intentar llamarlas. 
Teóricamente seria posible que la 
rutina de interrupción antes de ha¬ 
cer nada comprobase cuál de las 
dos ROMs está en ese momento y 
procediese en consecuencia. Sin 
embargo, nuestro único intento en 



ese sentido no ha tenido muy bue¬ 
nos resultados, ya que el Spectrum 
se colgaba en algunas ocasiones al 


acabar de ejecutar algún comando 
del interface. Nosotros seguimos 
pensando que es posible y quizás 
alguno de vosotros encuentre la so¬ 
lución. 

Por lo demás las interrupciones 
se tratan normalmente y sólo que¬ 
da destacar por su utilidad dos ru¬ 
tinas de la ROM. La primera es 
K.SCAN en la dirección *028E, 
que es la que realmente lee el te¬ 
clado. Si sólo hay pulsada una te¬ 
cla nos devuelve en el registro E un 
número entre 0 y 39 distinto para 
cada una de las 40 teclas tal como 
índica la figura í. Si son dos las te¬ 
clas pulsadas nos devuelve el nú¬ 
mero de tecla más bajo en el regis¬ 
tro D, y el otro en el E, a no ser que 


T ab 1 a m o d a s ;; t e n d ido + CS 
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TA8C2 

DEFB 

" f *DC, *DA 

A B C 

** . BRZGHT 

F AF’EF 

—r "X 

/ i 


DEFB 

1 A, *7B 

D E F 

barra. AUTO 

11 a v e 

78 


DEFB 

*EC,*ED*:*BF 

S H I 

GOTO GOSUB 

IN 

"7q> 


DEFB 

A B« ¡t ** h 6 

J i L. 

VALÍ SCREEN5 

ATTR 

80 


DEFE 

“DD. A DE, A DF 

M N 0 

INVERSE OVER 

OUT 

81 


DEFB 

*7F,*18¿*1B 

P Q R 

ccpyr, ELSE 

REMIJM 

82 


DEFB 

*7C,* 1 C,"ID 

S T U 

barra DN 

SWAP 

r* 

Qv 


DEFB 

*D9 

V W X 

FLASH ONERR 

INK 

84 


DEFB 

* 1E,*D7 

Y Z 

MQBE BEEP 


85 

KDIG.TT 

CP 

30 

Acaba si 

se trata. de 

SPACE„ 

86 


RET 

C 

ENTER o algún SHIFT, 


87 


DEC 

c 




88 


JP 

M, A 039D 

Salta con 

1 0 ’» modos K, L y 

C 

89 


JP 

N 2 , "-0389 

tamfa i e n can graphi es 


90 


LD 

HL,^0254 

Base para 

modo E + SS 


81 


BIT 

5, B 




82 


JP 

Z, "*034A 

Salta s i e 

si a pulsada SS. 


£1 "7 


CP 

■"■38 

Comprueba 

si se trata de los 

94 


JP 

NC,*0382 

números S 

o 


95 


AND 

-07 

Se queda con 0 I numero del 

col or 

96 


LD 

f*5CÓD),A 

>■ l o deja 

en K DATA. 


97 


LD 

A, * 10 

D e v u e A v e e 

1 codiga de cambio de 

98 


INC 

E 

ti r,ta, 



99 


RET 

NZ 




100 


INC 

A 

o cambio de papel si no 


101 


RET 


pulsado CS 

■ 


102 

CHTAB 

DEFB 

*380 

Reserva 

aspaci o para 

1 a 





d eíinici on 

d 0 ca v ac t 0 res. 


103 


LD 

A i E A 

Pone en 

maf cha la rutina de 
























RAHAl LtL 
PRiNTER 
PQR1 


jOySTlCH 

:OM^€CTOfl 


coí*€croR 


-TMlí'HhfíAi, 
rHBOyCiM 
CÜNNÉC rofl 


UN SISTEMA COMPACTO DE DISCO 
PARA EL SPECTRUM Y EL SPECTRUM + 


El Discovery 1 es el más avanzado 
sistema de disco jamás desarrollado 
para el Spectrum. 


El Discovery está especialmente disecado para aceptar los 
mismos comandos que el Irnerface 1 . per mi liándole uss r la 
mayoría de los programas de casette disecados para 
MitrodTive sin necesidad de modificarlos 


E Discovery r-c¡ ocupa 5 i 11 o er ¡a RAM ccl Speclrgm c-cu lo 
que podrá seguir disfrutando de sus programas de luego 
favonios s n necesidad de desconectado ya que deja .ipre 
toa a la memoria de¡ Speckum. Además, puede ya guardar la 
fueme de aumentación de¡ Specirum puesto q-je el 
Discovery le proporciona lensión a través del conectar 
trasero. 


DrSéñádO en Inglaterra. incorpora lamas reciente leenologia 
lapoaasa en discos oe 2,3 . El Discovery as el primero de la 
nueva generación de periféricos para el Spectrum 

Las asombrosas características dei 
Discovery incluyen: 

* El más moderna sistema de disco de 3.5" 

■ Salida CérUrpntcs pára impresora, 

* Inteíface de Joystick lipo «empalan 

* Sal id a para mon i lo r mon oc rom □ 

* Alimentación propia y para el Spectrum 

* Coñac i or para o t ros. peri re r icos 

El Üi&cqvery se conecta simplemente en la parte trasera de 
su Spactrum y le proporciona acceso instantáneo a i a 
velocidad, prestaciones y seguridad de un sistema de disco. 


El Discovery con acceso aleatoria permite cor im 
aplicaciones serias para el Speclrum; canlabilidades. 
facturaciones, tratamientos de te atas. etc., que eran 
posibilidades solamente, están añora a su alcance con el 
Discovery. hay a su disposición un amplio catálogo de 
programas reelmenie Lides y oíros que van a paree sen do 
continuamente que le pérmiiirán aprcvecnar la 
insospechada capacidad de su Spectrum 


SISTEMAS INCLUIDOS 


Sstida para impresora 
Interfíce joystick 


Compatible Centronics 
Conector standard tipo D de 
nueve contactos. Compatible 
Kempslon 

Coneclor standard para moni¬ 
tor monocromo 
De 56 vi 35 

220 V. 5 Ú H; con cable e 
interruptor incorporado. No 
se precisa la aumentación 
dei Spectrum 


Salida para monitor 


Conectar de expansión 
Alimentación 


Discovery 1 - El nuevo poder 
que respalda a su Spectrum 


FUTURAS AMPLIACIONES 

E- Discovery ^ ¡juede ampliarse a Discovery 2 en cualquier 
mome-nio. coiocaed -0 otra unidad de disco lííéníica en ef 
espac.o previste para ello Todas ¡as conexiones ya eslán 
elecluadas en el interior para simplificar er montare 
El Discovery Plus, que es el nombre del kit de ampliación 
esta formado por la unidad de disco. 1 cable de 34 vías y una 
RAM 6 i i 6 . que va insertada en un 2 ócaio previsto a este fin 


PROGRAMAS DISPONIBLES 

* Contabilidad profesional 

* Procesador de textos 

* Base de datos 


UMDADD£D/SCO 


Tipo 

Modelo 

Pistas 

Caras 

Capacidad total 
Capacidad lofmaleado 
Tiempo de acceso píslafpj&ta 
Alimentación 


St&ndáiddé 3 5' 
3540 1 
40 


Sistema RTTY (Rx Tx) para Spectrum 4.800 Ptas, 

Programador de EPROMS (desde la 2716 a la 27128) 

(para e( Spectrum y el Amstrad 464) 

interface Centronics para QL 12 800 Ptas 

Impresora Ibioo 80 columnas 30.400 Ptas 


SISTEMAS LÓGICOS GII10NA. S.A 

flvda. San Nartrsa. 24 

17005 GERONA ■ Tel \%1T\ 23 71 00 


SOLICITELO A SU DISTRIBUIDOR DE 
INFORMATICA O DIRECTAMENTE A 











una de ellas sea un shift, en cuyo 
caso irá siempre en el registro D. 
De haber más de dos teclas pulsa¬ 
das nos lo indica dejando el indica¬ 
dor de cero a cero (NZ). 

La otra rutina es KTEST, que 
realiza la conversión de los datos 
de KSCAN al código de la tecla 
pulsada si estuviéramos en modo 
C. Aquí es donde está la base de la 
tabla que indica qué letra corres¬ 
ponde a cada tecla. Si la cambiára¬ 
mos conseguiríamos que nuestro 
teclado dejara de ser de tipo 
QWERTY, lo que seria un peque¬ 
ño lío. 

Esto es todo en lo que respecta a 
las interrupciones. A continuación 
en el programa viene la definición 

^■HBÉÜIfifi 


de los 112 caracteres del modo 1. 
De momento eludiremos el pro¬ 
blema de introducirlos y por ahora 
limitaros a reservar 896 bytes. 

El bucle 
principal 

El bucle principal del BASIC 
(MAIN) es la parte más importan¬ 
te del programa, ya que es el encar¬ 
gado de ir llamando a las demás 
rutinas. La figura 2 muestra el dia¬ 
grama de flujo de esta parte, que 
como podréis ver no tiene princi¬ 
pio ni final a! estar continuamente 
ejecutándose. 


Las líneas 103-108 son las en¬ 
cargadas de poner en funciona¬ 
miento el programa, preparando el 
modo de interrupción 2 y saltando 
sobre NEW. Se podría pensar que 
las líneas 106 y 107 no son necesa¬ 
rias, ya que NEW se encarga de 
poner en su sitio la pila. Esto es 
cierto, pero su finalidad es poder 
realizar una entrada en caliente 
cuando está conectado el interí'ace 
1. Esta entrada se hace después de 
que el programa cargador haya 
«pokeado» el salto sobre NEW 
para que entre en MAIN 1 y de 
esta forma no se borre el BASIC. 
Cuando está el interíáce la entrada 
debe hacerse sin conectar las inte¬ 
rrupciones. 


x n t é r r u p c i o n © n m o d o 2 

Hac© SP igual a ERE SP + 2 

Inicialisa el programa, 

Apaga el {nodo AUTO. Salta aquí 
c: uan tj o p u I ea m os srj 1 ament e ENTEF . 
L_ a p a r t e b a j a d a i a p a n t a 11 a 
t i ene d o s 1 i. neas, 

P ra d uce un lis tatíc aut□matico. 

S E T-MI N L i m p i. a t c d a sí: l a s 

areas detras de E-LINE. 

Comprueba sí estamos en modo 
AUTO. 

Sal La ei no. 

Abre el canal ’R’. 


104 


LD 

1 , A 

.1.05 


IM 


1 Oó 


LD 

SF,Í*5C3D) 

107 


POP 

AF 

108 


JP 

NEW 

109 

AUTOFF 

XQR 

A 

1 10 


LD 

< AUTON),A 

111 

MEXEC 

LD 

(Iy+48 > ,*02 

112 


CALI, 

AULI3T 

1.13 

MAIN! 

CALL. 

* 1 6B0 

114 


LD 

A,(AUTON) 

.1,13 


AND 

A 

1 16 


JF: 

2,NAIN2 

117 


LD 

A, *FF 

1 1,8 


CAL!,, 

* 1601 

1. í 9 


LD 

HL, CAUTDLI) 

120 


LD 

DE, (AUTOIM) 

121 


ÁDD 

HL, DE 

-j 


8 IT 

/ j i 

tr , n 

■t -p» 

L jC O 


JR 

NZ,MAIN2 

124 


LD 

CAUTGLI) i HL 

125 


LD 

B,H 

Hj í*Ti ¡ 

I O 


LD 

L-" ^ Í-ln 

-í /“> “f 
,r. j.i. * 


CAL L 

*1A1B 

% Op 

MAIN2 

LD 

A. *00 

1 


CALL 

*1601 

130 


CALL 

EDITÜR 

131 


CALL 

LISCAN 


C a 1 c u 1 a e l n u e v o n u m e r o d e 3. i n © a 
sumando el incremento. 

Comp r ueba si i1 os hemos pasad o , 


Suarda él numera para la 
s 1 g u i e n t e I i n e a, 

y lo •'escribe’ en el canal R. 
Abre el stream 0 (normalmente 
canal K). 

Pide una linea BASIC. 

C om p r u e b a si 1 a & i. n t. a; i i s 


-peí -: r : t 






rbNEíK'OW REWUMAOTO ÍLSEMÓÓi Sifoipl 

(^vTTOMODe ELSEOhJ fteUMSWAP OH 

^ w ^ <W 


El resto del bucle se 
diferencia del de ía 
ROM en el tratamiento 
de los errores y en el 
modo AUTO, aparte de 
que llama a las rutinas 
propias en lugar de a las 
de la ROM. 

El modo AUTO se 
controla mediante la va¬ 
riable del sistema AU- 
TON, si su valor es dis¬ 
tinto de 0 hay que colo¬ 
car el número de línea. 

La forma de hacerlo es 
abriendo el canal «R» y 
escribiendo a través de 
él el número de línea. 

De esta forma se intro¬ 
duce directamente en el área de 
edición y cuando se llame al EDI¬ 
TOR aparecerá automáticamente 
el número. 

El tratamiento de errores se rea¬ 
liza cuando se vuelve de ejecutar 
un programa BASIC. Lo primero 


que hace es comprobar si se trata 
de un error 0 (no error), en cuyo 
caso no debe hacer nada más. Si se 
trata de otro error, hay que rastrear 
todo el programa en busca de al¬ 
gún ON ERR que se refiera a él, y 
si se encuentra continuar la ejecu¬ 


ción en ese punto. Esta 
es la causa de que con 
programas largos tarde 
un poco en responder al 
BREAK, ya que debe 
buscar por todo el pro¬ 
grama antes de dar el 
mensaje de error. 

En cuanto a la asigna¬ 
ción de la variable BA¬ 
SIC err se hace de la 
misma forma que la ins¬ 
trucción LET. llamando 
primero a CLASS-1 
para inicial i zar la varia¬ 
ble del sistema DEST y 
después a LET para que 
le de el valor correspon¬ 
diente. Aquí se presenta 
un problema, que es que al poner 
el número de error en el STACK 
se modifica DEST, y ya no apunta 
al nombre de la variable. Por esta 
razón aparece dos veces en el pro¬ 
grama. 

Manuel Arana 


132 

BIT 

7,(IV+O) 

correcta. 

4 

1 

1 E' 

u r\ 

NZ S MAIN3 

Salta -si ho hay problema. 

134 

BIT 

4 , (IY+48) 

Comprueba si realmente estamos 

135 

JR 

Z , MAIN4 

utilizando el canal K. 

136 

LE¬ 

HL,( A 5C59) 

E-LINE 

137 

CA L L. 

A 1 1A 7 

Elimina los números en coma 

f 1 ot artte q ue introdujo LISCAN. 

138 

LD 

<IY+01 , A FF ( 


139 

JR 

MAIN2 

La linea debe ser revisada. 

140 MAIN3 

LD 

HL, Í-SC59) 

E-L.INE 

141 

LD 

( A 5C5D),HL 

CH-ADD 

142 

CALL 

ELI NO 

Mira a ver si empieza con un 

143 

LD 

A, B 

numero de linea. 

144 

DR 

C 


145 

JP 

NZ , MADD 

Si es asi la linea debe 

introducirse en el programa. 

146 

RST 


GET-CHAR 

147 

CP 

A 0D 

Si b© trata solamente de ENTER 

148 

JR 

1 . AUTGFF 

hay que salir de AUTO. 

149 

BIT 

0, ÍIY+48) 

Borra la pantalla si es 

150 

CALL 

NZ „ CLALL 

n«cesar i o, 

151 

CALL 

*0D6E 

y la parte baja siempre. 

.L w jIh 

CALL 

CLCHAN 

Hace que las canales K y S 
vuelvan a apuntar a su sitio. 

I ,JO 

LD 

A. *19 

Calcula el contador de scoll 






















154 


SUB 

<IY + 79) 

155 


LD 

(IY+B2?,A 

15ó 


SF"T 

7, UY+l) 

157 


LD 

( IY+0) , J ' J FF 

158 


LD 

íIY+10),*01 

15? 


PUSH 

HL 

160 


LD 

HL, C*5CBA) 

161 


LD 

(*5CB0) ,HL 

162 


P0F 

HL 

163 


CfiLL 

LIRUN 

164 

L0ERR 

LD 

A,<*5C3A> 

165 


INC 

A 

166 


JR 

Z,MAIN4 

167 


LD 

C, A 

168 


F'USH 

BC 

169 


LD 

HL,(*5C53) 

í 70 


LD 

E, * 19 

171 


C A L L 

L00KP3 

172 


EX 

DE, HL 

173 


EX 

(5P>,HL 

174 


EX 

DE, HL 

175 


JR 

C,NEERR 

176 

ERRLD 

PUSH 

BC 

177 


CALL 

NEXTCH 

170 


CALL 

LI ERR 

179 


POP 

BC 

180 


JP 

Z,ENERR 

181 


EX 

DE, HL 

182 


EX 

(SP),HL 

183 


EX 

DE, HL 

184 


CALL 

L00KP2 

185 


EX 

DE, HL 

186 


EX 

(SP) ,HL 

187 


EX 

DE, HL 

188 


JR 

MC,ERRLG 

189 

NEERR 

POP 

BC 

190 

MAIN4 

HALT 


191 


RES 

5, iIY+1> 

192 


BIT 

1, íIY+48) 

193 


CALL 

NZ,*0EDC 

194 


LD 

A, i IY**• 0 > 

195 


INC 

A 

196 

MAING 

PUSH 

t í; “ 

197 


LD 

HL u“0000 

198 


LD 

<IY+55),H 

199 


LD 

(IY+3S),H 

200 


LD 

<*5C0B>,HL 


S-FOSN 

SCR-CT 

Se va ha ejecutar ana linea. 

No hay error. 

NSF'f'C. Emp e z amce por 1 a p r i sner a 
i n s t r Lie c i orí. 

Suarda la vari, ab 1 e S—POSNL- 


Ejecuta l a línea/pr ograma 
Comprueba si se ha producido 
algún error. 

Salta si no. 

Guarda el código del error. 

PRDG 

Codiga de ON ERR. 

Busca el primero en el programa» 
G u a r d a e i n u m e r o d e i n s t r u c c: i o n 
y el codigo de ON ERR. 

Salta si no se ha encontrado 
ningún GN ERR. 

Busca si hay alguna referencia 
al error que se ha producida. 

Sa-lta si si que la hay. 

• Recupera el numero de 

instruccion. 

busca el siguiente ON ERR, 
y vuelve a guardar el numero de 
instrucción y el codigo de 
ON ERR. 

Salta si ha encontrado el ON ERR 
Ya no necesitamos la dirreccion. 
Esper a 1 a sigui ente intsrrupcion 
FLAGS indica que se puede leer 
una nueva tecla. 

FLAGS2 

Copia e 1 b uf f er d e 1 a i mp r es or a. 
Calcula el codigo del error 
producido. 

Lo guarda. 

FLAGX 
X RTF: hi 
DEFADD 






Cada uno 


EN ZX SPECTRUM 


- Libros Oficiales Contabilidad 

- Diarios. Inventarios, Balances, etc. 

- Plan General Contable 
CENTRO DE ESTUDIOS: SI M A AS 
c/. Desengaño. 12 3 t- 3 28004 Madrid 

Telfs.: 221 31 49 221 3835 


l'LOITC 
l\ Ol I J 

• ORDENADORES PERSONALES 

• GESTION 

* APLICACIONES ARQUITECTURA 

# GARANTIA OFICIAL 

• FACILIDADES DE PAGO 

* ENVIOS A PROVINCIAS 

Barquillo 15 - XTno.: 232 57 37 -24004 MADRID 


CURSO DE CONTABILIDAD 
PARA P y M EMPRESAS 


ANUNCIESE 

por 

MODULOS 


MADRID 

( 91)7339662 

BARCELONA 

( 93)3014700 


Ordenadores personales Hard y Soft. 
• Cursos de Basic. 


Oficina RENOVACION EN MARCHA, S. A. 

Cf Espronceda, 34 23003-MADRlD 
Tina (9l> 441 24 70 

REMSHOP1 

Galilea, 4. 26015 MADRID 
Tino (91) 445 25 03 

REMSHOP 2 

C-’ Dr Gástelo, 14. 23008 MADRID 
irnp {91 i 274 95 43 

/ 

REMSHOP3 

C- Modesto La fuente. 33 23003 MADRID 
Tino (91) 233 33 19 

REMSHOP BARCELONA 

C-Muntaner 55 06Ü4 BARCELONA 

Tino (931 253 26 18 

REMSHOP LAS PALMAS 

0/ General Mas de Gamindez. 45. LAS PALMAS 
Tfno. £923) 23 02 90 


REMSHOP BILBAO 

C;“ General Concha. 12 - 46003 BILBAO 
Tfno. (94) 444 00 Gñ 

REMSHOP OVIEDO 

C/ Matemático Pedrayes. G - 33005 OVIEDO 
Tfna. (965) 25 25 95 


Bula del comprador de Tédospertmn 


ELECTRONICA 
^SANDOVALsa 
DISTRIBUIDORES DE: 
COMMODORE-64 
ORIC-ATMOS 
ZX SPECTRUM 
SINCLAIR ZX 81 
ROCKWELL-AIM-65 
DRAGON-32 
NEW BRAIN 
DRAGON-64 
CASIO FP-200 

ELECTRONICA SAN DO VAL. S. A 
C/ SANDOVAL. 3, 4, 6. 28010-MADR ID 
Teléfonos: 445 75 58 - 445 76 00 - 445 18 70 
447 42 01 

C/ SANDOVAL. 4 y 6 
Centralita 445 18 33 {8 lineas) 


CAMAFEO.no 


CASSETTES 
DE CALIDAD PROBADA 
PARA ORDENADORES 


0-5 ptas 
G-10 209 pías 
C-t5 219 pías- 
C-20 225 pifl5. 


1.393 P!¥i3 
1 403 pías. 
1 533 pla£. 
1.602 pías 


■3.582 plss. 
3.762 pías 
3.942 ptas 
4 T22 ptas 


Libre de gastos de envío contra reembolso correos 

CAMAFEO INC. Dep. 03 
José Lázaro Galdiano. 1, 28036 Madrid. 




























247 

MAIN 8 

LOOR 


Carga las variables. 

248 


RET 



249 

REF'G 

LD 

A , * 1.0 

Produce el error G si no hay 

250 


LD 

BC , *0000 

sitio para la nueva linea. 

251 


JP 

M AIN 6 


™. rr ■"> 

lili 1 i*-J iÍiHI 

ENERR 

LD 

HL, Í*5C5D> 

CHADD. 

253 


PU 8 H 

HL 

Lo guarda 

254 


PUSH 

DE 

y el codigo de error ien E) 

r-\ no ir; 

-*L ^ J w 


CALL 

* 16B0 

Limpia el area de trabajo. 

*™i IT' £ 

..JQ 


LD 

HL , ERROAR 

Hace que CHADD apunte al 

2 b / 


LD 

(*5C5D) , HL 

comience) de la palabra ERR. 

258 


CALL 

* 1 C 1 F 

Identifica el nombre de la 

variable. 

■■i k:~ qj 


POP 

DE 

Recupera el codigo de error. 

260 


LD 

A, E 

26 í 


CP 

A 15 

Comprueba si se trata de BREAK, 

/_ ' 
4. CJ i. 


JR 

NZ , NBREAK 

y salta si no. 

263 

WNOKEY 

XOR 

A 


264 


XN 

A, <*FE> 

Lee todo el teclado de una ves. 

265 


AND 

*1F 


266 


CP 


Espera a que no este apretada 

26"7 


JR 

NZ ? WNOKEY 

ninguna tecla. 

263 


LD 

A, *13 

Pone otra ves el numero de error 

■*7 4, o 
-!■*— C# ■- 

nbreak 

CALL 

MAIN? 

Asigna OLDPPÜ y ÜSPPC. 

270 


CALL 

*2D28 

STACK—A. Coloca A en la pila. 

271 


CALL 

*2AFF 

LBT. Pone el codigo de error en 
].a variable foasic srr. 

-7 7 “ 7 , 

4. - jL.L 


POP 

HL 

Recupera el antiguo valor de 

273 


LD 

<*5C5D) , HL 

CHADD - 

7 "7 4 

rl.n r T 


POP 

DE 


275 


LD 

A, “U \ 

El nuevo valor del numero de 

276 


sue 

D 

1 nstrucelon dehe ser 1 uno fias que 

277 


LD 

<*5C44> . A 

el del ÜN ERR. 

278 


LD 

HL,LOERR 

Col oca 1 a di receion de retorno 

7*7 0 


PUSH 

HL 

en la pila. 

,4 üü 


LD 

(IY+O) , *FF 

No hay error. 

7p í 

jt-O ¿ 


JP 

3TMRE7 

Continua la ejecución. 

7 p 7 
y . 1 ^ 

ERR'vñR 

DEF-'M 

"ERE* 11 

Nombre de 1.a variable srr. 

0 ~r 

.íL O -..V 

AUTGL.I 

DEFW 

“0000 

Numero de linea. 

264 

AUTGIN 

DEFW 

*0000 

1ncremenLo. 

2S5 


DEFM 

"ERR" 

Otra vez el nombre. 

236 

hLJTON 

DEFB 

*00 

Controla si estamos en AUTO. 

287 

madd 

LD 

< *5049),BC 

Guarda el numero en E-F'PC. 

383 


LD 

HL,(*5C5D) 

Coloca la variable CH-ADD en los 

28° 


EX 

DE s HL. 

registros DE. 

290 


LD 

HL,REPE 

Pone la dirección de REPG en la 

2«?i 


PUSH 

HL 

pila por si es necesario. 

■ 7 - ■::■ ~ 

rtrr, V .W 


LD 

HL, <*5C61> 

W0RKSP. 

297, 


SCF 


Calculalaiong 1 tud de 1 a 1 1 nea 

70 ¿1 

.4«. t 


SBC 

HL, DE 

desde detras del numero hasta el 




BH 













201 


LD 

HL,*0001 

202 


LD 

<*5C16>,HL 

203 


CAL.L 

* 16B0 

204 


RES 

5, <IY+55) 

205 


CALL. 

*0D6E 

206 


CALL 

CLCHAN 

207 


SET 

5, (IY+25 

208 


POP 

AF 

209 


L.D 

B, A 

210 


CP 


211 


JR 

C,MAIN5 

212 


ADD 

H . ^ U 7 

213 

MA1NS 

CALL 

* i 5EF 

214 


LD 

A, *20 

215 


EST 

* 1.0 

216 


LD 

A, B 

21.7 


LD 

DÉ , * 1391 

218 


CALL 

*QC0A 

219 


X0R 

A 

220 


LD 

DE,*1336 



CALL 

*0C0A 

^ \ ‘-y 


LD 

BC ? (*5C43) 

‘™i t 


CALL 

*1Á1B 

224 


LD 

A, *3A 

* m y ■"■> er 1 

■tfir -3-f; ‘‘-r.í 


feST 

* i 0 

226 


LD 

C,(IY+13? 

v -7 


LD 

B, *00 

228 


CALL 

* 1A1B 



C A L L 

*1.097 

230 


LD 

a, nv+o> 

231 


INC 

A 

232 


CALL 

NZ,MAIN9 

2 33 


LD 

iIY+ 10 ),*FF 

234 


RES 

3, (IY+1) 

n t!T 

áL 1 ■« J 


JP 

MA IN 2 

236 

MAIN9 

CP 

*09 

’“ T T ”T ”7 


JR 

Z,MAIN 6 

238 


CP 

-rA. i Ct“ 

239 


JR 

NZ,MAIN7 

240 

M A 3. N ó 

INC 

(IY+13) 


241 MAIN? 

LD 

BC,*0003 

242 

LD 

DE,*5C70 

243 

LD 

HL,*5C44 

244 

BIT 

7 , íIY+10 > 

245 

JR 

Z,MA l N8 

246 

ADD 

HL, BC 


STRM6 STREAM O apunta a canal K 
SET--MIN limpia todas las areas 
detras de E-LINE. 

Borra la parte baja de pantalla. 
Arregla les canales de E/5. 
TV-FLAG 

Recupera el código del error. 

Lo guarda en B. 

Si es mayor que 9 le suma 7 para 
escribirlo bien. 

Escr i be el codigo de error, 
y un espacio. 

Base para la tabla con los 
mensajes de error. 

Escribe el mensaje, 

seguido de una coma y un 
espaci o. 

PPG 

Escribe el numero de linea. 

Dos puntos 

SUBFPC 

Por ultimo escribe el numera de 
la i nst.ruc:ción. 

Limpía el ares de edician. 

El numero de error 
la incrementa 
Asigna OL..DPPC Y 05PPG 
N 8 P P C . I n d i c: a n o s a 11 a . 

Modo K. 

Es un STOP 

o BREfiK en el programa? 

5UBPPC. En ese caso debe 
c on tinuar en la siguí ente 

instruccion. 

Be prepara para dar el valor 
c orrecto a las varí ahles OLDPPC 
y 05PPC. 

Si se iba a producir u.n salto 
esta bien. 

8i no hay que usar PPG 


SÜBPPC 






295 

PUSH 

HL 

296 

LD 

H, B 

'297 

LD 

L, C 

293 

CALL 

19¿E 

OQO 

JR. 

NZ,MADDl 

300 

CALi_ 

•*Í9B8 


301 CALL " e “ 1 ?E8 

302 MADD1 POP BC 


303 

LD 

P, C 

304 

DEC 

A 

305 

GR 

B 

306 

JE 

ZMADD2 

307 

PUSH 

BC 

308 

INC 

BC 

309 

INC 

BC 

310 

I NC 

BC 

3.11 

INC 

BC 

312 

npr ; 

A,.- k»»M W 

HL 

•^r 

\*é* -r- 

LD 

DE, (•*505.35 

314 

PUSH 

DE 

315 

CALL 

- Upf -..J _J 

316 

POP 

HL 

317 

LD 

<*5053) , HL 

318 

POP 

BC 

319 

PUSH 

BC 

320 

1 NC 

DE 

321 

LD 

HL, (■"‘Set-I) 

jH-. r - 

-2' ,2 . jJ, 

DEC 

H L. 

>-t ■"? T 

Jnr- --U 

D &L. 

HL 

324 

LDDR 


325 

LD 

HL,(*5C49) 

■2* ,ic* éz^ 

EX 

DE , HL 

‘“r «7 

-.0 4™ / 

POP 

ir. 

DL 

“T O 

O 

LD 

(HL i , B 

"7 'y 

DEu 

HL 

330 

LD 

(HL) , C 


DEC 

HL 

-7* —1 

’2 " jL 

LD 

( HL ) , r 

t " ■ tt 

piPr 

rjii 1 " lana -lia- 

HL 

334 

LD 

■HL),D 

335 MADD2 

POP 

AF 

V 1 í"* 1 

JF 

NEXEC 


f :i. n de 1 in©a y lo guarda. 

Pasa la longitud de la linea a 
los registros HL y mira a ver- si 
ess i st© otra linea con ese nufnefro 
Sa 11 a <si no er i st e * 

NEXi—ONE. DevueI ve la direccion 
de la. siguiente linea. 

REGLA 11-12. Borra la linea. 
Recupera la longitud de la nueva 
linea, y c cm^w uftba si se trata de 
u n n u m e r o s © g u i d o d e i:. N i t R i' a d a 

Si es asi hemos acabado. 

Gu ar el a 1 a 1 o n g i t ud . 

Se necee. i. tan cuatro by tes mas 
para codificar el numero de 
1 i n e a y 1 a 1 b n g i t u d. 

HL apunta a 1 a direcci on 

an ter i or ?. 1 a d © dest *no. 

Guarda la direccion PR□G par'a 
e V 3 1 a i" p r o b 1 e m a s a 1 i n t r od u cir 
],a primer a 3. i nea. 

HAKE-RÜOM. Hace sitio para 3a 
3. i nea. 

Vuel ve a tul ocar la dirección en 
1 a variab1e PROG , 

Recupera 1 a, i o! ig i uud s¡. u .i. us 
c u a t r o b y t e s i n i. c i a 1 e 5 ■ 

DPI apunta al final del espacio 
p ar a 1 a n u ev a i i. nea. 

WORKSP. 

L & resta dos para que HL apunte 
a 1 f i i 1 a 3 d e i a 1 ¡.nea. 

Copia la linea en el area de 
pr oqrama. 

Cog© el nuffier o de 11nea 
■/ lo deja en DE. 

R ec up er a. 1 a 3. on g i t ud 
y la coloca en su sitio, sobr e 
los oytes 3 y 4 ci6 1 a 1 linea» 

Codifica de la mi Sena forma el 
numero de 1j. nea en loa ros 
primeros hyt.es» 

S a c a 1 a d t necio n d e R E P G 
y acaba volviendo a MEXEC. 

































































































































Complete su colección de 


ÜMtespectnm 


A continuación le resumimos el contenido de los ejemplares 
aparecidos hasta ahora. 


Núm. 1 *250 pts. 

Cómo usar el microdrive/Progra’ 
mación Basic/Ampliación Basicare/ 
Rutina despertador/Variables dei sis- 
tema/Enirada datos mediante másca- 
ras/Protección del software/SIntoní- 
ce su Spectrum/Programas. 


Núm. 2*250 pie. 

Gráficos profesipnales/Desplaza- 
miento pixel a pixet/Utilización de 
rutinas/Construcción del hterface 
centronics/Programas de utilidad pa¬ 
ra microdrive/Rutina reset en código 
máquina/Análisis del editor de textos 
Tasword/lnterfaces para impresoras/ 
Programas. 


Núm. 3*250 pts. 

Novedades sonimag S4/Ampl¡ando el 
Basic/Programas para ordenar pro- 
gramas/Gráfrcos con el VU-3D/Len- 
guaje Forth/Archivos en microdrive/ 
Programación de un interface de im- 
p res o ra/ P rog ra ma s, 


Núm. 4*250 pts. 

De profesión: programador/Consola 
para el Spectrum/Comparaclón códi¬ 
go máquina-Basic/Anáfisis programa 
contabilidad /Calend ario/Pascai/Pro- 
g ramas 


Núm. € *250 pts. 

Representación de funciones/Todos 
los caminos conducen a la ROM/Jue- 
gos/Pasca^Construcción de un lápiz 
Óptico/Programas de gestión. El SITI/ 
Logo: tortugas para todos/Interrup¬ 
ciones dei Z-80/Programas 


Núm. 5 *250 pts. 

Floppys para Spectrum/Diseño asis¬ 
tido por ordenador/64 Caracteres por 
Ifnea/Juego de la vida/Pascal/Asi ha¬ 
cemos las portadas/Control de eva- 
luaciones/Prog ramas. 


A\ 


[•Tu 

hTi 


1 iiL 

ÍT 

■ 1 1 

íJ 
Ll 


1 7ul 

1 k * ■ . j m * 


DISPONEMOS DE TAPAS ESPECIALES PARA 



SUS EJEMPLARES DE 

ÜMtespectnm 

SIN NECESIDAD DE ENCUADERNACION 


PRECJO 


ÚÑ¡D*° 


fcOOpta^ 


Para hacer su pedido, rellene este cupón HOY MISMO 
_ . _ y enrielo a: 

|0|BQC || f| £É| , |fl| Bravo Murlllo, 377 

?33 9e ^ _ 2BQ20 MADR|D 


(cada tapa es para 6 ejemplares) 


NOMBRE ... + + .. 

DfRECClOM . 

CIUDAD ..... C P. 

PROVINCIA .._ 


Por favor envíenme -- tapas para la encuadernación de mis 

ejemplares de TOÜQSPECTRUM. al precio de 600 pts. más gastos de envío. 
El Importe lo abonaré 

□ POR CHEQUE □ CONTRA REEMBOLSO □ CON MI TARJETA DE 
CREDITO □ AMERICAN EXPRESS □ VISA □ JNTERBANK 


Huego me envíen los siguientes ejemplares atrasados de TODOS- 
FECTRUM ...al precio de 250 pts. 
















El presente programa sirve para 
dibujar pantallas de presentación 
similares a las que aparecen al car¬ 
gar un programa desde el cassette, 
tal y como hacen en los juegos de 
ULTIMATE, por ejemplo. 

La calidad de las pantallas que 
permite hacer este Editor es simi¬ 
lar a la de los mejores juegos co¬ 
merciales, siempre y cuando nos 
pasemos dibujando frente al televi¬ 
sor el tiempo suficiente. La misma 


portada de esta revista se hace con 
un programa similar a éste. 

Para introducir el programa te¬ 
clear primero el listado 1 y grabar¬ 
lo con SAVE «Editor» LINE 1 


A continuación haga NEW y te¬ 
clee el listado 2: 

5 CLEAR 36954 
10 LET surn=0 
20 FORX=36955 TO 37719 
30 INPUT «Codigo»; a 


Con este programa un poquito de 
imaginación y grandes dosis de paciencia, 
tú también puedes ser nuestro portadista. 


PROTEJA SU SPECTRUM PLUS CON ESTA 
PRACTICA FUNDA 



Aproveche la oportunidad de mantener 
como nuevo su Spectrum Plus 
con esta funda, y beneficíese 
de un 30% de descuento 
sobre su precio normal. 


A UN PRECIO ESPECIAL 


OFERTA LIMITADA 
Y EXCLUSIVA PARA 
NUESTROS LECTORES 



















m+a: PRINT x,a 

50 NEXTx 

60 IF sum=68169 THEN 
PRINT «Ok»: STOP 

70 PRINT «Erron> 

Ejecútelo e introduzca los 765 
códigos de la figura 3, si obtiene 
error repáselos, y si no, grábelos 
con SAVE «c» CODE 36955, 765, 
a continuación de lo anterior. 

Al ejecutarse el programa (con 
LOAD»») aparece en pantalla el 
menú de opciones: 

1. DIBUJAR.—Permite realizar 
en la pantalla nuestro dibujo utili¬ 
zando un punto como cursor que 
va pintando por donde pasa; se 
mueve con O, P, Q, A para iz¬ 
quierda, derecha, arriba y abajo 
respectivamente. Si a la vez pulsa¬ 
mos SPACE, el cursor se desplaza 
sin dibujar nada, y pulsando CAPS 
SHIFT va borrando. En la parte 
inferior de la pantalla aparece la 
posición del cursor en alta y baja 
definición. Pulsando L la posición 
del cursor se toma como origen 
para las próximas líneas o arcos 
que tracemos. Con F se traza una 


viamente con L y la posición del 
cursor. Con S se traza un arco, 
donde se nos pide el ángulo, que 
debe ser dado en grados sexagesi¬ 
males. Pulsando C se nos pide el 
radio del círculo que se traza con 
centro el cursor. Al apretar X, la 
pantalla se cuadricula según los 
cuadros de baja definición; para 
volver a la situación normal se 
pulsa de nuevo X. SIMBOL 
SHIFT+V tiene el efecto de borrar 
la pantalla. Con M se vuelve al 
menú, quedando la pantalla guar¬ 
dada en memoria. 

2. TEXTOS.—Esta opción sirve 
para imprimir las letras y símbolos 
del Spectrum, bien en tamaño nor¬ 
mal o gigante. En tamaño normal 
aparece un cursor que se guía con 
las flechas en el Plus o con CAPS 
SHIFT y 5, 6, 7, 8 en el Spectrum 
48 K; apretando una tecla aparece 
el símbolo correspondiente en la 
posición del cursor. Podemos di¬ 
bujar números, minúsculas, 
mayúsculas (con CAPS SHIFT) y 
signos (con SIMBOL SHIFT); para 
poner © se pulsa 1 +SIMBOL 


ENTER. En tamaño gigante se nos 
pide el texto, que debe ser menor 
de 32 caracteres, y se coloca con 
unas rayitas que marcan el extre¬ 
mo superior e izquierdo del mis¬ 
mo. Las rayitas se mueven con O, 
P, Q y A según lo habitual, se si¬ 
túan pulsando ENTER. 

3. GRAFICOS DEFINIDOS 
POR EL USUARIO.—En la op¬ 
ción de dibujar podemos imprimir 
en la pantalla cualquiera de los 21 
GDU, que aparecen en la parte in¬ 
ferior, y también espacios. El cur¬ 
sor se mueve igual que en textos 
normales, se sale igualmente con 
ENTER. En la opción de crear po¬ 
demos dibujar nuestros propios 
GDU. Elegimos el gráfico a modi¬ 
ficar con las teclas con flechas a iz¬ 
quierda o derecha o bien con 
CAPS SHIFT + 5 u 8, según el tipo 
de ordenador. Pulsando S se saca 
el gráfico de la memoria al cuadra¬ 
do que aparece en pantalla. Con M 
se mete el dibujo del cuadrado en 
la memoria correspondiente. Con 
E lo que hay dibujado se invierte 
como si lo mirásemos en un espejo 


O>REM **EDITQR DE PANTALLA** 
1985 E. Salvador 

1 CLEAR 36954: LOAD “ 11 CODE : 
POKE 23658,0 

5 DEF FÑ i (;í) -256*1NT íx/25 

6): DEF FN q (:<)”>:—( INT (U-22528 
>/32> >*32-22528 
7 60 TO 9000 

10 LET or=a(4): LET de=16384: 
GO SUB 3060 

15 INPUT "Coord. iniciales ";a 

■ b i ^ 

i7 IF a>255 OR a<0 OR b<0 OR b 
>175 THEN BEEP .1,-20: GQ TO 15 
20 LET m=0: LET al=a: LET bl=b 
: LET L l=a: LET 12=b 

30 IF m THEN PLOT INVERSE 1; 
al,bl: LET m=Os 60 TO 50 
40 PLOT a,b 

50 LET a=a+(IN 57342=190 AND a 
<255) — íIN 57342=189 AND a>0>: LE 


T b=b- í 1N 65022=190. AND b>0)+<IN 
64510=190 AND b<l75> 

60 PRINT ■“l; AT 1, O; "Pos. -"; a; ” 
11 ; b n ** “ íAT 1 , 17 ; I NT (< 175 -b> 

/S) ; 11 “ ;INT <a/8); M " 

65 LET a.l=a: LET bl=b 
70 IF IN 32766=190 THEN GO TO 
50 

90 IF IN 65278=190 THEN LET m 
=1: GO TO 30 

10b IF INKEY*="1" THEN LET 11= 
a: LET 12=b: GG TO 30 
105 IF INKEY$= ,1 h " THEN RANDOMI 
ZE USR 37348 

110 IF INKEY*= 1, -f 1J THEN PLOT 11 
,12: DRAW a~ll,b-12; GQ TO 30 
115 IF INKEY$="s" THEN INPUT " 
Angulo? “jan: PLOT 11,12: DRAW a 
-11 ,b-12,PI*an/iB0: 60 TO 30 
120 IF INKEY$= 11 c " THEN INPUT " 
Radio ";r: IF a>~r AND b >=r AND 
255—a>=r AND 175-b>=r THEN CIRO 









y con G se gira un cuarto de vuelta 
en sentido antihorario. Apretando 
D podemos dibujar nuestro gráfi¬ 
co; aparece un cursor en el cuadra¬ 
do que pinta blanco con O, negro 
con P, y que avanza sin pintar con 
L. para salir se pulsa ENTER y ya 
podemos meterlo en memoria, gi¬ 
rarlo o in-vertirlo y meterlo en 
otro gráfico, etc. Para volver al 
menú se pulsa Q. 

4. COLOREAR.—Esta opción 
nos permite dar color a la pantalla 
que hemos dibujado previamente. 
Con O, P, Q y A podemos despla¬ 
zar un cursor por toda la pantalla. 
Pulsando C se nos pide el código 
de colores con que queremos pin¬ 
tar. Se debe introducir un número 
de 4 cifras: la primera indica 
FLASH, y debe ser 0 ó 1, la segun¬ 
da es el BR1GHT y debe ser igual¬ 
mente 0 ó 1, ía tercera cifra es el 
código del PAPER y debe ser un 
número del 0 al 7, y la cuarta cifra 
es el INK, también un número del 
0 al 7. Podemos cambiar de códi¬ 
gos pulsando C cuantas veces que¬ 
ramos. Al pulsar R aparece en 
pantalla en grande el cuadro que 


ocupaba el cursor cuando pulsa¬ 
mos R. lo podemos modificar con 
O, P y L igual que se hacia para 
crear GDU, y al apretar ENTER 
se sitúa en pantalla en la posición 
del cursor. Para volver al menú se 
pulsa M. 

5. LINEAS INFERIORES.—En 
este apartado podemos subir el ter¬ 
cio inferior de pantalla del archivo 
que indiquemos (véase apartado 
6), al tercio medio de la pantalla, 
enmarcado por dos líneas negras 
arriba y abajo. Posteriormente po¬ 
demos bajar nuevamente este ter¬ 
cio a su lugar original. Gracias a 
esto, después de subirlas, podemos 
dibujar, colorear, etc., las dos lí¬ 
neas inferiores de la pantalla, que 
normalmente no son accesibles. 

6. ARCHIVOS.—En la memo¬ 
ria del ordenador existen cuatro 
zonas que pueden albergar toda la 
pantalla. Las tres inferiores se de¬ 
nominan archivos 1, 2 y 3, y en 
ellos podemos meter la pantalla 
actual para luego comparar cuál es 
mejor, si va bien un dibujo o no, 
etc. También se puede sacar un ar¬ 
chivo a pantalla. La cuarta zona o 


archivo se utiliza para guardar la 
pantalla en curso cuando volve¬ 
mos al menú, creamos un gráfico, 
etcétera. 

7. GRABAR.—Nos permite 
grabar en cinta la pantalla o uno 
de los tres archivos, bien en su po¬ 
sición de memoria o sacados pre¬ 
viamente a la pantalla. 

8. CARGAR.—Carga una pan¬ 
talla en la posición en que la gra¬ 
bamos. 

9. VERIFICAR—Verifica lo 
que hemos grabado si era un archi¬ 
vo, la pantalla no se puede verifi¬ 
car porque aparece en ésta la ins¬ 
cripción «Bytes:» y, por tanto, no 
es igual que cuando la grabamos. 

NOTA: La memoria requerida 
es de 48 K. Como el programa está 
escrito en un Spectrum Plus, es ne¬ 
cesario una modificación para el 
Spectrum normal: se deben cam¬ 
biar los 190 y 189 por 254 y 253, 
respectivamente, en las líneas 50, 
70, 80, 4560 y 4580. Para grabar el 
propio programa una vez introdu¬ 
cido se teclea GOTO 9998. 

Eduardo Salvador Martínez 


LE a,b,r: 60 TQ 30 
125 IF INKEY$="/" THEN CLS s G 
P 10 30 

130 IF INKEY$= u m" THEN LET or* 
16394: LET de=a(4): GO SUB 8060: 
RETURN 
140 GÜ TQ 30 

1510 CLS : F'RINT "Normal (1) o g 
i gante (2)" 

1515 IF INKEVÍO"" THEN 60 TG 1 
515 

1520 LET a$=INKEY$: IF aSO"!" A 
ND a$< >"2" THEN GQ TD 1520 
1530 LET or=a(4>: LET de=16384: 
GO SUB 8060 

1540 60 SUB VAL a*#500+1100 

1550 LET or=16384: LET de=a(4): 

GG SUB 8060 

1560 RETURN 

1600 LET a=0: LET b=a 

1610 LET at=ATTR <a,b) 

1615 LET al-a: LET bl-b 


1620 POKE 22528+b+a*32 f 214; LET 
a$=INKEY$ 

1630 IF a$=CHR$ 8 THEN LET b=b- 

(b'Xí ) : GG TG 1680 

1635 IF a$-"AT " THEN LET a$= 

ll 

1640 IF a*~C Hft$ 9 THEN LET b~b + 
íb<31); GÜ TQ 1680 
1650 IF a$~CHR$ 10 THEN LET a=a 
+(a<21): GQ TG 1680 
1660 IF a$=CHR* 11 THEN LET a=a 
-<a>0>: GD TQ 1680 
1665 IF a*=CHR£ 13 THEN POKE 22 
528+bl+al*32,at: RETURN 
1670 PR1NT AT a,b;a$: IF a$< >"" 
THEN LET b=b+l: IF b=32 THEN L 
ET a~a+l: LET b=0: IF a=22 THEN 
LET a-0 

1680 POKE 22528+b1+a1#32,at: GG 
TD 1610 

2100 INPUT "Texto LET lz«L 

EN z$: IF LEN z$>32 THEN BEEP - 









2,-20: 60 T0 2100 

2105 IF INKEY$< > ,! " THEN GO TO 2 

105 

2110 LEI yy=80 

2120 PLOT ÜVER l;0,i75-yy: DRAW 
OVER 1(6,0 
2125 LEI yyl=yy 

2130 LET yy*yy+<INKEY*-"a ,1 )-(INK 
EY$="q") 

2132 IF yy=175 THEN LET yy«Q 
2134 IF yy=~l THEN LET yy=175 
2140 PLOT OVER 1:0,175-yy1; DRA 
W GVER 1:6,0 

2150 IF lÑKEY*OCHR* 13 THEN GO 
TO 2120 

2160 INPUT "Ampliación altura " ; 
ysi IF yy+É*ys>!75 THEN BEEP .2 
,-20: 60 TO 2160 

2170 PRINT ~1;AT 1 r p("Condicione 
s longitud (s/n)LET a$=INKEY$ 
: IF á*< >"s" AND a$í>"n" THEN 6 
O TO 2170 

2180 IF a*- H n" THEN LET x»-INT 
(32/1 2 ): LET «k* (256”S*>;s* 1 z>/2: 
GO TO 2300 

2185 IF INKEY$< >"" THEN 60 TO 2 
185 

2190 LET i<x = 120 

2200 PLOT GVER 1; x x , O: DRAW OV 

ER 1;O,6 

2205 LET ;í;í 1=;;x 

2210 LET ::;< =;<;< + ( INKE"p " ) - (INK 
EY$= ll a ") 

2212 IF ¡;¡:=256 THEN LET ;o:=0 
2214 IF K1 THEN LET mí: «=255 
2220 PLOT OVER 1;v;:í1,0: DRAW 0 
VER 1(0,6 

2230 IF’ INKEY1K >CHR$ 13 THEN 60 
TQ 2200 

224 O INPUT "Ampliación 1□ng 1 1 ud 

" S «s: IF khVxs*8*1z>255 THEN BE 

EP .2,-20: 60 TO 2240 

2300 LET :l =23306: POKE i , xx s POK 

E i + l,yy; POKE i+2,;<s: POKE i+3, 

ys: POKE i+4,8: LET i=i+4: FOR 

= 1 TO Izi POKE i +;;, CODE z*(x>: N 

EXT >¡: POKE i+lz+1,255 

2310 PANDONI2£ UBR 37408: RETURN 

3010 CL.S : PRINT "Dibujar (1) o 
crear (2)" 



3020 LET a$=INKEY$: IF a$< >"1" A 
ND a$< >"2" THEN GD TQ 3020 
3030 IF a$="2" THEN 60 TÜ 3500 
3040 LET d@=l6394: LET ar=aí4): 

60 BUB 8060 

3050 REH Una de las tilas de let 
ras es en modo gráficos 6: PRINT 
*1;..AT 0,0;" ABCDEFGHI JKLMNO 

F l OF;S T U M Ei : C: C* EiFGHI ■ J K L, M N O 

POP.5TU " 

3060 LET a=0; LET b=a 
3070 LET at=ATTR ía,b) 

3080 LET al=a¡ LET bl=b 

3090 POKE 22528+ b + a Y 32,214: LET 

a*=INKEY* 

3100 IF a*«CHR* 8 THEN LET b=b- 

< b >05 : 60 TG 3180 

3110 IF a*=CHR* 9 THEN LET b=b+ 

( b31 ) ; GO TO 3180 

3120 IF a*=CHR* 10 THEN LET a»a 

+ £ a<21): GO TO 3180 

3125 IF " " THEN PRINT AT a, 

b s" GO TO 3170 

3130 IF a*=CHR$ 11 THEN LET a=a 

- íaXD : GO TQ 3180 

3140 IF a$=CHR$ 13 THEN POKE 22 

523+b1+a1*32,at: LET or=16384: L 

ET de~aí4): 60 SUB 8060; RETURN 

3150 IF a$<"a" OR a$>"u" THEN G 

ü Tü 3090 

3160 PRI NT AT a,b;CHR$ (CÜDE aí+ 
47) 

3170 LET b=b+l! IF b=32 THEN LE 
T a=a+l: LET b=0: IF a=22 THEN 
LET a=0 

3180 POKE 22528+b1+a1*32,at s GO 
TO 3070 

3500 CLS ; REM La fila inferior 
de letras es en modo de gráficos 
Gs PRINT AT 2,5;"ABCDEFGHIJKLMN 
O P Q R 3 T U AT 4,5; "AE C D C F G H X G K L. 
M NOP O F: STU" 

3510 PLOT 94,46: DRAW 68,0: DRAW 
0,68: DRAL --68,0; DRAW 0,-68 
3520 LET g*0 

3530 POKE 3711l,g: PRINT OVER 1 
5 PAPER 5;AT 2,5+g;" ";AT 3,5+g; 

" "¡AT 4,, 5 + g;" " 

3540 LET a*=ÍNKEY*¡ IF a$~CHR¥ 8 
THEN PR1 NT OVER 1; PAPER 7;AT 
2,5+g;" ";AT 3,5+g;" ";AT 4,5+g 







■ 


i" LET g=g-i: IF g=-l THEN L 
ET g = 2Q 

3550 1F a$=CHR$ 9 THEN PRINT □ 
VER 1; PAPER 7;AT 2,5+g;" "; AI 3 
,5+g;" 11 ; AT 4 , 5+g; " 11 : LET g=g + l 
: IF g=21 THEN LET g=0 


3560 IF a$= 

" d 11 

THEN 

60 SUB 3650 

3570 IF a*= 
SR 37217 

**© IS 

THEN 

RANDGMIZE U 

3580 IF a.í= 
3R 37276 

"g M 

THEN 

PANDO MI ZE LJ 

3590 IF ai= 

u ii 

THEN 

FÜR j<=8 TO 

15: PRINT 

PAPER 7;AT 

i m. 11 

í'l * .1 J 

"i NEXT 
i "2 

Yi IF 

J \ H 

RANDGMIZE USR 371 

3600 IF a$= 

"m" 

THEN 

RANDGMIZE U 

SR 37164: PRINT 
44+g) 

’ AT 4, 

5+g;CHR$ (i 

3610 IF a$= 

" q 11 

THEN 

RETURN 


3620 60 T0 3530 

3650 LET b=S: LET c = 12 

3660 LET at=ATTR (b,c>: POKE 225 

2B*32*b+c ,16+24* < at'*»40 DR at*56) 

3670 IF INKEY$ = ¡, o 1 ' THEN POKE 22 

528+32*b+c,5ó: LET c=c+I 

3680 IF INKEYf -="p" THEN POKE 22 

52S+32*b+c, O: LET c=c + l 

3690 IF INKEY$= U 1" THEN POKE 22 

52B+32*b+c , 56*.<at=56 ÜR at. =40) : 

LET c=c + l 

3700 IF INKEYí=CHR$ 13 THEN POK 
E 22528+32*b+c,56*(at=40 GR at=5 
6): RETURN 

3710 IF c=20 THEN LET c=l2: LET 
b=b+1: IF b=16 THEN LET b=8 
3720 60 TO 3660 

4510 LET or=3 <4); LET de=16384: 
60 SUB 8060 

4515 INF'UT "Coor. iniciales "ja; 
" ";b: IF a>21 GR a<0 OR b<0 OR 
b >31 THEN BEEP .2.-20: 60 TO 45 
15 

4520 LET a=22528+b+32*a: LET al= 
a: LET at=56: LET atl=at 
4530 POKE al.at: 60 TG 4550 


-32*(IN 64510=190 AND a>22559) 
4570 PRI NT •* í ; AT 1, O; " Pos. - "; IN 

T í <a—22528) /32) ; 11 "; Fhl g (a) ; 11 

11 

4580 IF IN 32766=190 THEN 60 TO 
4530 

4590 IF JNKEY*» , '.c" THEN 1NPUT " 
Codigo "; s.'T: IF LEN a$= :¿ ! THEN 6 
O TO 4630 

4600 IF INKEY^’r” THEN 60 SUB 
5000 

4610 IF INKEY$—"m" THEN POKE al 
, at 1: LET or= 16384: LET de=a<4); 

" 60 SUB 8060: RETURN 
4620 60 TO 4540 

4630 LET at=128*VAL a$<i>+64*VAL 
a*(2)+8*VAL a$(3)+VAL a$(4); 60 
TG 4540 

5000 LET or = 16384: LET de=a< 4): 
60 SUB 8060 

5010 CLS : PLOT 94,46: DRAW 68,0 
: DRAW O 5 68: DRAW —68,0: DRAW O, 
—68 

5020 POKE 37001,FN fía): POKE 37 
002,1NT (a/256): RANDONIZE USR 3 
7000 

5030 LET b=8: LET c=12 
5040 POKE 22528+32*b+c,16+24*(AT 
TR (b,c)=56 OR ATTR íb,c)=40) 
5050 LET a$=INKEY*: IF a$=CHR$ 1 
3 THEN POKE 22528+32*b+c,56*íAT 
TR (b,c)=40): RANDOMI2E USR 3703 
3: LET or = a í 4): LET de=16384; 60 
SUB 8060: RETURN 

5060 IF a$= "p" THEN POKE 22528+ 
32*b+c,0: LET c=c+l 
5070 IF a$*"o" THEN POKE 22528+ 
32*b+c,56: LET c=c+l 
5075 IF a$ = "1" THEN POKE 22528+ 
32*b+c,56*(ATTR <b,c>=56 OR ATTR 
(b,c)=40): LET c=c+l 
5080 IF c =20 THEN LET c = 12¡ LET 
b=b+l; IF b=16 THEN LET b=8 
5090 60 TD 5040 

6010 CLS : PRI.NT "Subir (1) o ba 


4540 POKE a1,at1 

4550 LET al=a: LET atl=PEEK a: P 
OKE a,214 

4560 LET a=a+(IN 57342=190 AND a 
<23231)-UN 57342=189 AND a >2252 
8)+32* <IN 65022=190 AND a<23200) 


jar (2)" 

6020 LET a*=lNKEY$: IF a$<>"l" A 
ND a$<>"2” THEN GG TO 6020 
6030 IF INKEY3K >" 11 THEN 60 TO 6 
030 


6040 PRINT 


'Numero de archivo 













( 1 , 2 , 3 )” 

6050 LET bi=INKEYÍ: IF bi<"i" GR 
b*>"3" THEN SO Tü 6050 
6060 IF aí= 11 í" THEN LET or=a<VA 
L bi)+4096i LET de=a<4)+2048 
6070 IF aí""2" THEN LET de=a(VA 
L bi > +4096: LET ar=a<4)+2048 
6080 FQKE 36956, FN -f(or)s POKE 3 
6957,INT tor/256): POKE 36959,FN 
T(de): POKE 36960,INT (de/256) 
6090 RANDOMIZE USR 36955 
6100 FOF; x = O TO 31* POKE 60472+x 
,255: POKE 62552+^,255: NEXT x 
6110 RETURN 

8000 CLS : PRINT TAE 5;"Meter(1) 
o sacar<2> " 

8010 LET a**INKEYi¡ IF **<>" 1 " A 
ND a$< >"2" THEN G0 TO 8010 
8015 IF INKEYiO"" THEN GO TÜ 8 
015 

8020 PRINT ,:, TAB 5s "Numero archi 
vo (1,2,3)" 

8030 LET b$=INKEYÍ: IF bi<" 1“ ÜR 
bi>"3" THEN GO TO 8030 
8040 IF ai=" 1" THEN LET or=a(4) 

: LET de=a(VAL bi) 

8050 IF ai="2 ,! THEN LET de=a(4) 

: LET or-a(VAL bi) 

8060 POKE 37709, FN -f(or>: POKE 3 
7710,INT (or/256) 

8070 F’OKE 37712, FN f<tíe>: POKE 3 
7713,INT íde/256) 

8080 RANDOMIZE USR 37708 
8090 RETURN 

8100 CLS : PRINT "Archivos {1,2, 
3) o pantalla (4)" 

8110 LET ai-INKEYis IF a*<"l" GR 
a$>"4" THEN GO TG 8110 
8120 IF INKEYiO"" THEN GO TG B 
120 

8130 PRINT ’’"En memoria (1) o p 
antalla (2)" 

8140 LET bi-INKEYi: IF bi<>"1" A 
ND b*<>"2" THEN GO TG 8140 
8150 INPUT "Nombre ";ni: IF LEN 
ni>11 THEN DEEP .2,-20: Gü TO 8 
150 

8160 IF bi="2" GR ai= i '4" THEN L 
ET or=a(VAL a$> : LET de-16384: G 
G SUB 8060: SAVE niSCREENi : RET 
URN 



8170 SAVE niCODE a(VAL ai),6912 
8180 RETURN 

8200 CLS : INPUT "Nombre ";ní 
8210 LOAD r.iCGDE 

8215 LET or=16384: LET de=a(4): 

Gü SUB 8060 
8220 RETURN 

8300 CLS : INPUT "Nombre "5 ni 
8310 VERIFY niCODE 
8320 RETURN 

9000 BORDER 4: INK O: PAPER 7: B 
RIGHT O: DVER O: INVERSE O: CLS 
i INK 8 : PAPER 8 : BRIGHT 8 
9010 DIM a (4): LET a(1)-37720 
9015 POR x=2 TG 4: LET a(x)=a<l) 
+6912* <>í-l) ¡ NEXT x 
9017 RANDOMIZE USR 37380 
9020 CLS : PRINT AT 5, 14;"MENU" ? 

’ ;TAB 11 ;" 1 Dibujar";TAB 11;"2 T 
ex tos"; TAB 11; "3 GDU" ; TAB H;"4 
Col orear TAB 11; "5 Lineas in-f." 

;TAB 11;"6 Archivos";TAB 11 ;"7 G 
rabar";TAB 11;"8 CargarTAB 11 ; 

"9 Veri -f i car" 

9025 PRINT AT i r 5;"** EDITOR DE P 
ANTALLA* * " ; AT 2,4; " 

^ , . AT 19¡(6 . 1 985 Edu 

Salvador" 

9030 LET ai= INKEYi: IF THE 

N GO TO 9030 

9040 IF ai>= 11 1" AND ñi<"6" THEN 
GO SUB (VAL ai-l>*1500+10: GG T 
□ 9020 

9050 IF aÍ>"S" AND ai<*"9" THEN 
GO SUB (VAL ai-6)*100+8000 
9060 GO TQ 9020 

9998 SAVE "Editar" LIME 1: SAVE 
"c"CODE 36955,765 


qgoa 

VERIFY 

VERIFY 

""CODE 


cr 

OLEAR 

36954 



10 

LET eum-0 



20 

FDR x = 

36955 TG 377 

19 


30 

INPU7 

"Codiga " ; a 



40 

POKE ¡í 

,a: LET sum- 

su.m+a: 

PR 

INT 

>c « a 




50 

NEXT x 




60 

IF 3um 

=68169 THEN 

PRI NT 

" o 

k M : 

STOP 




7 0 

PRINT 

"error 11 















36955 

33 88 

190 17 

37175 

■^n 

22 0 95 

37395 

1 

0 27 9 

36959 

88 236 

1 0 

37179 

25 

6 8 229 

37399 

216 

84 93 19 

36963 

¡3 229 

213 237 

37183 

33 

236 89 125 

37403 

24 

237 0 0 

36967 

176 209 

235 124 

37187 

197 

5 214 32 

37407 

0 

33 15 91 

36971 

214 229 

56 6 

37191 

16 

252 111 14 

3741 1 

126 

35 34 0 

36975 

6 17 6 

2 10 

37195 

0 

6 8 126 

37415 

91 

111 60 200 

36979 

24 4 6 

10 

3719? 

203 

33 167 32 

37419 

38 

0 41 41 

36993 

62 17 

14 0 

37203 

2 

203 193 35 

37423 

41 

237 75 54 

36987 

9 235 

225 71 

37207 

16 

245 121 193 

37427 

92 

? 62 8 

36991 

9 ó 1 

237 

3721 1 


119 35 16 

37431 

50 

4 91 58 

36995 

176 201 

0 0 

37215 

“3 O '—y 
jL.jL.XL 

201 6 8 

37435 

i 1 

91 50 9 

36999 

0 33 22 89 

37219 


236 89 1.25 

3743? 

91 

58 10 91 

37003 

124 230 

3 203 


19? 

5 214 32 

37443 

50 

S 91 62 

37007 

39 203 

39 203 

37227 

16 

252 111 1 

37447 

9 

50 5 91 

3701 1 

39 198 

64 103 

37231 

0 

8 203 33 

37451 

126 

35 34 2 

37015 

1 88 164 9 

37235 

126 

35 167 32 

37455 

91 

7 50 6 

37019 

6 8 12 

6 229 

TJ "7 'Tf 


203 193 16 

37459 

91 

58 5 91 

37023 

Jo Z o 

89 79 

37243 

245 

6 8 125 

37463 

61 

32 50 58 

37027 

125 197 

5 214 

37247 

144 

111 203 65 

37467 

4 

91 61 32 

37031 

32 16 

252 111 

37251 

40 

4 54 0 

37471 

24 

58 14 91 

37035 

121 6 

6 203 

37255 

24 

2 54 56 

37475 

71 

58 12 91 

37039 

127 40 

2 54 

37259 

35 

203 41 16 

37479 

79 

58 10 91 

37043 

0 35 2 

03 39 

37263 

241 

193 16 208 

37483 

129 

3 32 252 

37047 

16 245 

193 225 

37267 

201 

153 90 60. 

37487 

50 

10 91 42 

37051 

36 16 

223 201 

37271 

24 

60 90 90 

37491 

0 

91 195 35 

37055 

42 137 

144 124 

37275 

60 

17 148 145 

37495 

146 

50 4 91 

37059 

230 3 

203 39 

37279 

6 

8 33 12 

37499 

58 

13 91 71 

37063 

203 39 

203 39 

37283 

89 

125 197 214 

37503 

58 

9 91 128 

37067 

198 64 

103 1 

37287 

32 

16 252 111 

37507 

SO 

9 91 42 

37071 

88 164 

9 6 

37291 

1 

0 8 203 

37511 

2 

91 195 64 

37075 

B 229 


37295 

“T 

O 

126 35 167 

37515 

146 

50 5 91 

37079 

89 125 

197 5 

37299 


2 203 193 

37519 

58 

12 91 71 

37083 

214 32 

16 252 

37303 

16 

245 121 18 

37523 

58 

9 91 50 

37087 

111 14 

0 6 

37307 

193 

19 16 226 

37527 

7 

91 58 13 

37091 

8 126 

203 33 

37311 

17 

148 145 6 

37531 

91 

79 197 205 

37095 

167 32 

2 203 

37315 

S 

33 20 89 

37535 

196 

146 193 58 

37099 

193 35 

16 245 

37319 

197 

45 16 253 

37539 

7 

91 60 50 

37103 

121 193 

225 119 

37323 

26 

19 79 203 

37543 

7 

91 13 32 

37107 

36 16 


37327 

65 

40 4 54 

37547 

241 

58 8 91 

37111 

14 33 

88 255 

37331 

0 

24 2 54 

37551 

60 

50 8 91 

37115 

58 247 

144 203 

37335 

56 

203 41 125 

37555 

5 

32 221 58 

37119 

39 203 

39 203 

37339 

198 

32 111 48 

37559 

6 

91 195 80 

3 71 2 3 

39 22 

0 95 

37343 

238 

193 16 225 

37563 

146 

128 64 32 

37127 

25 6 a 

126 

37347 

201 

33 0 64 

37567 

16 

8 4 2 

37131 

4¡« ■ r M B ’t? 1 

236 89 

37351 

78 

124 6 5 

37571 

1 

58 142 92 

37135 

79 125 

197 5 

37355 

203 

39 16 252 

37575 

238 

255 71 58 

37139 

214 32 

16 252 

37359 

167 

121 40 4 

37379 

141 

92 160 71 

37143 

111 121 

6 8 

37363 

238 

128 24 2 

37583 

58 

8 91 230 

37147 

203 127 

’ 40 2 

37367 

238 

255 119 35 

37587 

248 

1 11 58 7 

37151 

54 0 3 

;s 203 

37371 

124 

254 88 200 

37591 

.91 

254 192 208 

37155 

39 16 

245 193 

37375 

24 

230 0 0 

"^73° 5 

3 1 

31 31 230 

37159 

225 35 

16 223 

37379 

0 

33 88 171 

37599 

31 

103 203 28 

37163 

201 33 

88 255 

37383 

17 

89 171 54 

37 ó 03 

203 

■ 29 203 28 

37167 

58 247 

144 203 

37387 

56 

1 255 2 

37607 

203 

29 203 28 

37171 

39 203 

39 203 

37391 

229 

237 176 225 

37611 

203 

29 62 88 







37615 

180 

103 

58 

142 

37619 

9? 

i 66 

176 

1 19 

37623 

58 

7 91 

71 


37627 

230 

7 2 

46 

64 

37631 

103 

120 

31 

31 

37635 

31 

230 

24 

180 

37639 

103 

120 

-"“í 

23 

37643 

230 

Jbr P 

111 

58 

37647 

8 < 

71 71 

31 



37 ¿51 31 31 230 31 

37655 181 111 235 

37659 188 146 120 

37663 7 79 6 0 

37667 9 70 26 33 

37671 6 91 20-3 70 

37675 40 3 176 18 

37679 201 47 176 47 

37683 IB 201 0 O 


37687 

0 

0 0 

0 

37691 

0 

0 0 

0 

3 7 695 

0 

0 0 

0 

37699 

T 

220 

10 206 

37703 

11 

231 

80 26 

37707 

23 

«PW 

O ó 

8B 223 

37711 

17 

0 64 1 

37715 

0 

27 2 

:37 176 

37719 

201 

0 

0 0 




PROcEot/flE Toboso 
✓Ap I : !VT-£fr£P ; 

BE 4 PW 

Fon I: = 1 Til £< 

SPAFJíO (A) , 
Rr&HT fiO) 
£(JV: 


BEGIN 

TURTLE 

FOR I: = 1 TO 9 DO 
BEGIN 

A RCR (0,5,360); 
R1GHT (40) 

END 

END 


IE WUFICO fS. RF4t) ; . 
íí (S,CO) 


'<« ( S,6 

■T(UO), 

K (j, ta); 
■T ( 120) 






S^dW&U/Os qjmJucújs 


Muchos de nuestros lectores 
opinan que el BASIC se queda cor¬ 
to y recurren a otros lenguajes. 
Este es el caso de Alberto Gómez 
Corona, que se ha indinado hacia 
el Pascal y nos envía un conjunto 
de procedimientos y funciones que 
serán de gran utilidad a la hora de 
realizar gráficas. 

Este conjunto de subrutinas 
emulan funciones del BASIC y 


otras añaden potentes comandos 
en tres dimensiones. 

Como ejemplo se incluye un 
programa de dibujo de curvas cua¬ 
dráticas. Estas pueden variar de 
forma cambiando simplemente el 
valor de las constantes a.byc. 

Los procedimientos son: 

ATTRP {ink, paper, bright, 
flash). Cuyo manejo lo dan los 
nombres de los parámetros que 
hay que pasarle. 


Aparte de éste y algún otro simi¬ 
lar, los más interesantes son plotS 
(x, y, z) dibuja un punto con estas 
coordenadas teniendo en cuenta 
que {xc, ye, zc) está en el centro de 
la pantalla y que el punto de vista 
es(ax, ay, az). 

Draw3 (x, y, z) dibuja el punto 
igual que plot3 pero uniéndolo 
con el punto dibujado anterior¬ 
mente por medio de una recta. 
(Esto lo diferencia del draw del 























































































































BASIC que es relativo, mientras en 
éste se dan las coordenadas absolu¬ 
tas del punto). 

Hay que decir que e! programa 
se compiló con el Pascal de Hisoft 
y los resultados fueron muy pre¬ 


cisos, aunque tarde algo en reali¬ 
zar el dibujo. 

Por último nos queda hacer la 
advertencia de siempre referente a 
la «psicópata» de nuestra i mpreso- 
ra, que el numeral lo cambia por 


un triángulo y el abrir llaves por 
dos puntos puestos horizontal¬ 
mente en la parte superior del ca¬ 
rácter. ¡T ened cuidado! 

Alberto Gómez Corona 48K 



5C B4D3 

5 PROGRAM REP3DIM; 

B4D3 

7 

"al berta 6. Corona 3-8 

5> 

B4D3 

10 

VAR XC,YC,ZC,AX,AY,AZ: 

REAL; 

B4DC 

11 

A,B,I,J,K:INTEGER; 

B4DC 

12 

PRQCEDURE ATTRP(1,8,8, 

F:INTE6ER) 

m 

> 

B4DF 

13 

VAR ATR;INTEGER; 

B4DF 

14 

BEGIN 

B4F7 

« 

15 

ATR: =I+P*8+B*Ó4+F*128 

B53C 

16 

F'OK'E (23693, ORD (ATR) ) ; 

B54B 

17 

END; 

B55Ó 

18 

FUNCTION INTERIOR(A,B: 

INTEGER)sBÜGLEAN; 

B559 

19 

BEGIN 

B571 

20 

IF <A>=0>ANDCA<-255)A 

ND(B> 

=0)AND(B< = 175)THEN 

B5D0 

21 

INTERIOR:=TRUE 

B5D3 

m 


ELSE INTERIOR:=FALSE 

H 

B5DC 


END; 

B5EÓ 

73 

PROCEDURE DRAW(X,Y:INT 

EGER) 



B5E9 

74 

BEGIN 

BóO 1 

75 

IF X<0 THEN P0KEC232 

96,QRD( A FF>>; 

B624 

76 

IF X>=0 THEN POKE<23 

296,ORD <1>>: 

BÓ49 

77 

IF Y<0 THEN POKE(232 

97 ,ORD C^FF)>: 

BóóC 

7B 

IF Y>=0 THEN POKE(2329 

7,ORD(1í); 


B691 
^ ! 

B6A3 

>; 

B6B5 

79 

POKE(23728,ORD(ABS(X)) 

80 

POKE(23729,ORD(ABS(Y)> 

81 

INLINE( A D9,-E5,*D9, A ED 


■*•80, * 

5C,^ED,“5B, A OÚ, *5B,^CD 

,-BA, 

T jl 

D9,^El,*D9); 

BÓC6 

QO 

O jL. 

END; 

BóDO 

83 



BÓDO 

84 

PROCEDURE PLQT(X,YsINT 

EGER); 
B6D3 

85 

BEGIN 

B6EB 

86 

POKE < 23728,ORD < X )>; 

B6FA 

87 

POKE (23729,GRD(Y>); 

8709 

88 

INLINE t^ED,^4B,^5C 

, ^CD, ^E5, * 

*22) ; 

B710 

90 

END; 

B71A 

100 

PROCEDURE PL0T3(X,Y,2: 

REAL); 
B71D 

105 

CONST X0=500; Y0=128;Z 

Ü~88; 

B71D 

110 

VAR 

B71D 

120 

R,R1,W,W1,V,V1:REAL; 

B71D 

125 

XI,Y1,X2,Y2,X3,Y3,Z3sR 

EAL; 

B71D 

130 

Al,81:INTEGER; 

B71D 

140 


B71D 

150 

BEGIN 

B735 

170 

R:=SQRTÍSQR(XC-AX)+S 

QRCYC- 

■AY) ) 

■ 

B77D 

180 

W!=ÍAY~YC) /R; 

B7B1 

190 

V:=(XC-AX)/R; 

B7E5 

200 

R1:=SÜRT(SDR(R)+SQR( 

AZ-ZC)); 


B822 

210 

W1;=A2/R1; V1:=R/R1; 
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B86F 

220 

X1:=X~AX; Y1 :=Y~AY; 

BBBF 

230 

X2:=Xl*V-Yl*Wi 

B90E 

240 

Y2:=X1*W+YÍ*V; 

B959 

250 

Z3: ~Z~ AZ; 

B931 

260 

Y3:-Y2; 

B999 

270 

X3:*X2*V1-Z3*W1( 

B9E3 

280 

Z3s=X2*Wl+Z3*Vls 

BA33 

290 


BA33 
0) ; 

30 0 

A1;=TRUNC«Y3 * X0/X3+Y 

o m 

o 

Tí 

310 

B1:=TRUNC< Z3fX0/X3+Z 

BAAB 

HEN 

315 

IF INTERIOR(Al,Bl) T 

BAC9 

320 

PLQT(Al,Bí); 

BAEO 

325 

A¡=A1;B:=B1; 

BAF2 

340 

END; 

BBO1 

350 

PR0CEDURE DRAW3 < X , Y, Z : 

REAL) 

¡ 

BB04 

360 

OAR Al,BisINTEGER; 

BBO 4 

370 

BEGIN 

BB1C 

400 

Al:=A;B1:=B; 

BB2E 

410 

PLQT3(X,Y,Z); 

BB6 1 

420 

IF INTERIOR<A,B) 

THEN 

BEGIN 

BB79 

); 

BBA8 

r +- U 

DRAW(Al-A,Bl-B 

427 

END; 

BBA3 

430 

END; 

BBB4 

500 

FUNCTION CUADRIGA<Y,Z: 

REAL 5 

:REAL; 

BBB7 

510 

CQNST A=50;B=65;C~100; 

BBB7 

520 

VAR RAIZ:REAL;' 

BBB7 

530 

BEGIN 


BBCF 

540 

RA1 1 : = í1+SQR(Y/A)-SQ 

RÍZ/B))s 


BC23 

550 

IF RAIZ>—0 THEN 

BC48 

560 

CUADRIGA:-C*BQRT(RAIZ) 

BC5E 

570 

EL5E CUADRIGA:=1000; 

BCB3 

580 

END; 

BC8F 

600 

FROCEDURE EJES; 

BC92 

605 

BEGIN 

BCAA 

ó 10 

PLQT3(0,0 p 0)iDRAW3(50, 

0 „ 0 > ; 
BCEC 

620 

PL0T3 <0,0,0);DRAW3(0,5 

0,0) ; 
BD2E 

630 

PLQT3 <0,0,0);DRAW3(0,0 

, 50) ; 


* 

BD70 

640 

END; 

BD76 

700 

BEGIN 

BD7F 

705 

WRITE(CHR(12));WRITE(C 

HR(21));WRITE(CHR(0)); 

BD94 

710 

XC:=0;YC:=0;ZC¡«0; 

BDBB 

720 

AX:=400;AY:=400;A Z:=40 

o, 

BDE2 

734 

ATTRP(7,0,0,0); 

BDF7 

736 

EJES; 

BDFC 

740 

FÜR J:=-50 TQ 50 DO 

BE 19 

750 

FOR I:=“50 TO 50 DO 

BE39 

755 

BEGIN 

BE3C 

760 

PL0T3(CUADRIGA(3* 

I,3#J) 

,3*1 

:,3*J) ; 

BE98 

765 

PLQT3(-CUADRIGA(3 

*1.3*J),3*1,3*J>í 

BEFC 

767 

END; 

BF02 

770 

END. 


End Addresss BF04 
Run?C 





Señoras y señores, he aquí un pequeño avance de lo más significativo 
número. Gracias por su atención. 


— Introducción a la electrónica digital. 

— Una utilidad para mejorar el editor del BASIC. 


— Spectrum 128K. Un pnmei 
vistazo. 

— QL: introducción al 
SuperBasic. 





































El corcho 



0¿Qué tipo de corriente necesita 
el Spectrum? ¿Cuánto consume? 
Lo pregunto porque tengo una te¬ 
levisión portátil que conecto, por 
la toma del mechero, a la batería 
del coche y quisiera hacer lo mis¬ 
mo con mi Spectrum 48K o ali¬ 
mentarlo con pilas para poder así 
llevármelo de camping. 


por uno en el orden que aparecen 
en la revista. Todo esto lo deberás 
hacer antes de salvar en cinta el 
programa, de forma que las matri¬ 
ces queden grabadas con éste. Re¬ 
cuerda que no debes nunca hacer 
RUN para ejecutar el programa 
(esto borraría las variables), utiliza 
para ello GOTO 5. 


Juan Bar celó 
Madrid 


„a tensión nominal de entrada 
en el Spectrum es de 9 voltios, por 
lo que si deseas conectarlo a la ba¬ 
tería del coche necesitarás de un 
alímentador que transforme los 12 
V de ésta. Por otra parte, si tu or¬ 
denador es de 48K consume del or¬ 
den de 700 mA, por lo cual la alter¬ 
nativa de utilizar pilas queda des¬ 
cartada (las consumiría en muy 
poco tiempo), pero no así la de uti¬ 
lizar la batería, que debe funcio¬ 
narte a la perfección. Esperamos 
que tu Spectrum disfrute de esos fi¬ 
nes de semana al aire libre que es¬ 
tamos seguros se merece. 


esearía saber si el listado del 
MONOPOLY de la revista núme¬ 
ro 8 se puede almacenar en micro- 
drive o en cassette, y si se puede al¬ 
macenar en cassette, cómo puedo 
almacenar las matrices. La linea 4 
no la puedo introducir en el orde¬ 
nador, saliendo una interrogación 
después de la sentencia LOAD 
cuando trato de introducirla. 

José Gallego 
Alaquas 

o hay ningún problema si 
quieres jugar al Monopoly y no 
dispones de microdrive; simple¬ 
mente deberás suprimir la línea 4 
y, para introducir las matrices, di- 
mensionar las variables que vas a 
utilizar (bastará que hagas: DIM 
C$ (38): DIM Q (38,8): DIM U$ 
(27,2): DIM V (27,2): DIM K 
(38): DIM D$ (II)), ejecutar los 
programas de introducción que hay 
después de cada serie en ios datos 
anexos e introducir los datos uno 


n el programa Manic Miner. 
los muñecos que se mueven inde¬ 
pendientemente del movimiento 
de nuestro protagonista tendrán al¬ 
guna rutina en C/M que creo será 
de interés para los lectores de vues¬ 
tra revista, por lo que sugiero lo 
publiquéis. De esta forma los pro¬ 
gramas que enviemos serán mucho 
más atractivos. 

Eduardo Casado 
Zaragoza 

os gustaría mucho poder com¬ 
placer tus deseos, pero las dificul¬ 
tades son muchas y variadas: en 
primer lugar debes tener en cuenta 
que el «genio» que programó el 
juego a que aludes tiene que dar de 
comer a sus hijos, no podemos pu¬ 
blicar así como así un programa sin 
él permiso de su autor o la casa que 
lo distribuye. Por otra parte, el 
efecto que mencionas no es el re¬ 
sultado de una única rutina, sino de 
docenas de ellas de gran compleji¬ 
dad. Aparte del gran espacio que 
ocuparían en la revista, no creemos 
que haya muchos lectores que ten¬ 
gan el nivel necesario como para 
poder acoplarlas en sus programas. 
Por ahora deberás contentarte con 
cosas más sencillas, como ias que 
mes a mes venimos ofreciendo. 


0En el magnífico articulo VA¬ 
RIABLES DEL SISTEMA, apare¬ 
cido en el número 1 de vuestra re¬ 
vista, encuentro la falta de explica¬ 
ción a algunos bits que son impor¬ 
tantes para el análisis de la ROM, 
y que tampoco están detallados en 
los libros habituales dedicados al 
código máquina. 

Me interesaría conocer el signi- 








de 16 K 
iu&í en «s- 
>n, r e 8 a ' 0 
3 «Código 

Todo P° r 

GordiUo. 
derecha. Vitoria 


Vendo ordenador 

sa-SiSs* 

10.000 pts- K3U , 0 derect 

c/ Za! vaRu- W U 69tl ° Che 


Vendo por solo 5*000 pts. gran fi¬ 
chero, conteniendo curso de inicia¬ 
ción a la informática y lenguaje Ba¬ 
sic, además regalo cinta con progra¬ 
mas dosier con catálogos de ordena¬ 
dores y periféricos, revista especiali¬ 
zada, pegatinas y discos o musicas- 
settes. Fernando Gastan, c/ Padre 
Manjón, 34,5.° E. Zaragoza 50010, 


Su anuncio puede ir aquí. Escribanos a 
«El corcho»* TO DOS PECTR U M. 
^íravo Morillo, 377. 5, u A. 28020 
Madrid. 
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Si deseas colaborar en TGDOSPEC- 
TRUM remite tos artículos o progra¬ 
mas a ¡ Bravo MurilJo 377.5." A. 28020 
Madrid. Los programas deberán estar 
grabados en cassette y tos artículos 
mecanografiados, 

A efectos de remuneración, se ana]i* 
za cada colaboración aisladamente, es- 
tudiando su, complejidad y calidad. 



íícado de cada uno de los bits de 
las variables siguientes: 

23611 FLAGS 

23612 TV FLAGS 
23658 FLAGS 2 
23665 FLAG X 
23697 P FLAG 

José García 
Valencia 

stamos de acuerdo contigo: 
La falta de información referente a 
estas «banderas» es total, y un gra¬ 
ve hándicap para quien pretende 
adentrarse en el desensamblado de 
la ROM. Hemos hecho un esfuerzo 
para ofrecerte unas pequeñas (da¬ 
das las limitaciones de esta sec¬ 
ción) pero útiles notas del signifi¬ 
cado de cada uno de los bits utiliza¬ 
dos; éstas se refieren a lo que indi¬ 
can cuando están activados (valor 
1 ). 

23611 5C3BH FLAGS: 

bit 0: se ha imprimido un espa¬ 
cio. 

bit 1: se está usando la impreso¬ 
ra. 

bit 2: modo «L». 
bit 3: modo «K». 
bit S: una tecla ha sido pulsada, 
bit 6: se está manejando una ex¬ 
presión numérica (0 si alfanuméri- 
ca). 

bit 7: se está ejecutando una or¬ 
den (0 si se está comprobando su 
sintaxis). 

23612 5C3CH TV FLAGS: 

bit 0: utilizando parte baja de la 
pantalla (0 si parte principal). 

bit 3: el cursor (K, L, C, etc.) ha 
sido cambiado. 

bit 4: se está haciendo un listado 
automático (AUTOLIST). 

bit 5: la parte baja de la pantalla 
necesita ser borrada. 

23658 5C6AH FLAGS 2: 
bit 0: la pantalla ha sido borra¬ 
da. 

bit 1: el buffer de la impresora 
ha sido usado. 

bit 2: la cadena tratada está entre 
comillas, 
bit 3: modo «C». 
bit 4: usando canal «K». 

23665 5CCDH FLAGX: 
bit 0: la expresión tratada es una 
cadena simple (no dimensionada ni 
fragmentada). 


bit 1: la variable tratada no exis¬ 
tía. 

bit 5: se está ejecutando un IN- 
PUT. 

bit 6: el INPUT es numérico (0 
si es aifanumérico). 
bit 7: usando INPUT LINE. 
23697 5C91H PFLAG: 
bitOy l:OVERl. 
bit 2 y 3: INVERSÉ 1. 
bit4y5:INK 9. 
bit 6 y 7: PAPER 9. 

23734 5CB6H FLAGS3: 
bit 0: se está ejecutando un co¬ 
mando extendido. 

bit 1: se está ejecutando 
CLEAR. 

bit 2: ERRSP ha sido cambiado, 
bit 3: utilizando la red local, 
bit 4: ejecutando un LOAD, 
bit 5: ejecutando un SAVE. 
bit 6: ejecutando un MERGE. 
bit 7: ejecutando un VERIFY. 


Nota de la Redacción 

A todos aquellos colaborado¬ 
res voluntarios que nos envían 
programas para su publicación, 
queremos darles las gracias en 
público por su colaboración y 
os pedimos un pequeño favor, 
cuando nos enviéis programas 
para publicar, poner el nombre 
y demás datos de interés (direc¬ 
ción, teléfono, etcétera) en todo 
lo que enviéis, en la cinta, en el 
texto, en la carta, etcétera. Por¬ 
que si lo ponéis sólo en el sobre 
corréis el riesgo de que os suce¬ 
da lo que a: 

Jaime Melendi, autor del 
programa de listas escolares del 
número de septiembre. 

Pablo Torrente, creador del 
monitor de código máquina del 
número de agosto. 

Que sólo escribieron su direc¬ 
ción en el sobre y por desgracia 
tiramos éste. Así pues, escribid 
la dirección en todos los sitios 
posibles y estos dos amigos que 
hemos comentado, por favor, 
enviadnos vuestra dirección o 
llamarnos por teléfono para que 
podamos pagaros vuestro traba¬ 
jo publicado. 

Gracias a todos por ayudar¬ 
nos a hacer una revista mejor. 
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Una publicación que 
informa con amenidad 
acerca de las novedades 
en el campo de las 
computadoras personales. 


ORDENADOR POPULAR, 
la revista para el 
aficionado a la 
informática. 

Ya está a la venta 

Cómprela en su kiosco habitual o solicítela a: 


ORDENADOR 

- POPULAR. 


Bravo Murfflo, 377 
Tel 7339662 
28020- MADRID 





























'.RO 

MAT 

— PARAR 

) 

TAB 

fc> 

PRINT l| 

P ü 



SPECTRUM128 EL SUMMUM 


Spectrum, como líder, marca un nuevo hito en 
la historia de los ordenadores familiares. 

El Spectrum 128. 

Gran capacidad de memoria, Teclado y 
mensajes en castellano, teclado independiente 
para operaciones numéricas y de tratamiento 
de textos... 

Sinclair e Investrónica han desarrollado una 
auténtica novedad. En ningún lugar del mundo, 


salvo en los Distribuidores Exclusivos de Investrónica, 
podrás encontrar el nuevo Spectrum 128. 

Sé el primero en tener lo último. 

SPECTRUM 128. NOVISIMUS 



investrónica 


Tqjtiás Bretón, 82. Caxnp, SO. 
m (91) 467 82 10, Tels. (93) 211 26 58 - 311 07 54 
'tete* 23399 [YCO E. 08022 Barcelona 
38045 Madrid 





